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EDITORIAL 


We hope that we have now begun to establish a recogniseabte ‘RISC user* flavour, both with 
regard to style and content. We are grateful to those who have written to us already with their 
opinions on the magazine, but we wilt continue to listen carefully to the views and com ments of 
ail RISC User members who communicate with us. We will also be delighted to receive 
programs and articles for potential publication and we do pay for all materia* used. To help 
would-be contributors we have prepared a set of notes to provide some guidance on style and 
other matters. To receive a copy please ask for "RISC User Contributors' Notes* 1 and send us 
an A5 SAE The address for all communications appears at the foot of the contents page 
opposite. 


As reported on the news page foliowing, Acom did not manage to send out more than a handful 
of Series One OS ROMs before Ghristmas, and it now appears likely that many users will still 
be without the new ROM at the time you receive this copy of RISC User. Several programs and 
articles in this issue were prepared on the basis that all readers would by this time have Series 
One installed in their machines. In view of the likely situation, we have added additional markers 
at the head of articles where appropriate showing where use of the Series One OS is essential 
{and in the case of the article on Fonts, the Series One Welcome Disc is required as well}. We 
very much hope that Series One will be the standard for everybody by the time of the next issue 
of RISC User, and it is our firm intention to concentrate on Series One only as soon as possible. 
Do make sure you have returned your owner registration form to Acorn as this is the only way to 
obtain the upgrade. 


We have established the monthly disc as an ideal companion to your copy of RISC User. To 
make this even better value, we are endeavouring to add additional items on to each c£sc, and 
so far all three discs have been filled to near capacity. On the disc for issue one we were able to 
include Computer Concepts' stunning animation of Newton's cradle, issue two contained a 
number of equally impressive screen displays from Clares, showing the use of their Artisan and 
Graphic Writer packages. For this month's disc we have included some of the best entries in our 
Painting Competition, the results of which are given on the next page. You will be able to load 
these into the Welcome paint package to make further modifications if you so wish. See the 
back cover for details. 


Please note that this issue of RISC User covers both January and February (we publish ten 
times a year). The March issue should be with you near the beginning of that month. 


The Archimedes Magazine 
and Support Group. 








A round-up of the latest news and comment in the Archimedes 
world compiled by Mike Williams. AH prices quoted below 
include VAT. 

ACORN 

The new managing director of Acorn replacing Brian Long 
who resigned suddenly last year, is Harvey Coleman of Olivetti 
[Acorn's majority shareholder). We very much hope that this will 
remove some of the current uncertainty at Acorn and that better 
times now lie ahead. 

We reported in the last issue that Acorn expected to start 
shipping the 1 1 OS ROM before Christmas to existing owners of 
the Archimedes. Despite the fact that supplies were in the main 
warehouse, apparently very few were sent out in December and 
the latest indication is that the new ROM will be sent out during 
January, to be followed shortly after by ArcWriter [see article in 
this issue). We stress again that you must have returned the 
owner registration form that comes with your Archimedes to 
receive these free upgrades. 

Whether Acorn has had second thoughts or not we don't 
know, but a spokesman for Acorn has stated that there is now 
no immediate intention to change the price of 'C, Fortran or 
Pascal as was suggested last month. 

The offer of 0% finance spread over 12 months has proved 
very popular with potential purchasers, and Acorn has extended 
this to the 31st January. Moreover, this deal now covers the 
latest A440 as well as the A305. A310 and A310M. BEE8UG 
normally holds stocks of all these machines, and all the details 
required to purchase through this scheme can be given over the 
phone, 

MORE ART FOR THE ARCHIMEDES 

Another art package lor the Archimedes has been released, 
this time by Fairhurst Instruments Ltd. It is claimed to be the first 
art program to use a 256 colour mode and is available at the 
special budget price of £19.95. The package is mouse-driven 
using icons, and while not offering all the facilities of Clares' 
Artisan [reviewed in the first issue of RISC User), does provide a 
worthwhile set ol tools for the budding artist. Arctist is available 
from Fairhurst Inslruments Ltd. Dean Court, Woodford Road, 
Wilmslow, Cheshire SK9 2LT or telephone (0625) 525694. 

MORE SOFTWARE FROM CLARES 

The full versions of Clares' Artisan and Graphic Writer 
(formerly called Image Writer), which were reviewed in Ihe first 
and second issues of RISC User respectively, are now readily 
available at £39.95 and £29.95 (10% discount to RISC User 
members - see price list). Clares has said that a utilities disc for 


use with Artisan should be available by the end of January, This 
will provide an upgraded Integra colour printer dump, dumps for 
a number of colour dot matrix printers, a number of slick fade 
routines, and probably some additional sprites and graphics. 
Details have yet to be finaiised as has the price, but this should 
be under £20. Clares' promised database package, Alphabase, 
should also be out at about the same time [at a cost of £49.95), 
and we hope to be able to review this in the next issue of RISC 
User. For further details contact Clares Micro Supplies, 98 
Middlewich Road, Rudheath, Northwich, Cheshire CW9 7DA or 
telephone (0606) 48511. 

BBC MICROLIVE 

We understand that the BBC are planning a special 
Microlive programme on graphics and animation in which the 
Archimedes will be heavily featured. There is no firm date yet for 
the transmission but look out around the end of 
January/beginning of February, 

BEEBUG PAINTING COMPETITION 

In the first issue of RISC User we invited readers to submit 
their best efforts using the Painting program on the Welcome 
disc. The winner, out of the entries received, has to be Kalhie 
Lewis of Hampton Hill, Middlesex, but close runners up were 



Elliott and Zoe Hughes (age 12 and 10 respectively) from 
Swan wick, Derbyshire, both of whom submitted individual 
pictures, and Jeroen Boomgaardt from Enschede in the 
Netherlands who provided an excellent rendering ct 
Acorn's Archimedes poster. Our thanks and congratulations to atl 
who entered, and a prize of Artisan [thanks lo Clares) has been 
sent to the winner, Clares has generously provided a second 
copy of Artisan and this is winging its way to Elliott and Zoe tor 
their splendid efforts. We will be including the best ol the pictures 
submitted on this month's magazine disc, mm 
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REVIEWS 


ArcW r iter 


Mike Williams Investigates ArcWriter, Acorn s free word processor for Archimedes users. 


When the Archimedes was launched, Acorn 
promised that an early purchasers of the machine 
would be supplied eventually with a word processor 
free of charge. ArcWriter is the result, and Acorn 
says that it will continue to supply ArcWriter to ail 
new owners (who register with Acorn) for the 
foreseeable future. 

ArcWriter is a large (132K) Basic program which 
makes full use of the WIMP environment to provide 
a largely WYSIWYG style of word processor. There 
Is one large window which contains your text, 
displayed as brack on white, and which provides an 
overall limit to line width. Pressing the menu button 
on the mouse with the pointer in the text window 
displays the edit mode menu on screen. From here 
you can select fonts (Elite, pica, enlarged, subscript 
and superscript) and underline text, all displayed as 
such on the screen. 



Screen formatting is governed by a ruler 
measured in centimetres, and page margins, 
header and footer space is likewise specified in the 
same units. You can select paper size too (A4 and 
A5 in my version) but I believe other sizes will be 
possible). Tab stops are selected from a Tab weir 
and positioned on the ruler as required using the 
mouse pointer, a system that works well and is 
easy to understand. One bonus is that the bottom of 
each page shows up clearly on the screen as a 
grey line between lines of text. This is always useful 
information. 

Text may be feft, right or fully justified, or 
centred. These options are also selected from icons 
displayed with a ruler. In effect, every line of text 
visibte on the screen has its own individual ruler. If 
the ruler is displayed on the screen then scrolling 


the ruler Is displayed on the screen then scrolling 
through the text will show the ruler settings for each 
line in turn. 

it Is also feasible to mark blocks of text by 
moving the cursor to the start of a block, moving the 
pointer to the end of the block and pressing the 
adjust (right-hand mouse button). Once a block of 
text has been marked in this way it can be deleted, 
copied or moved elsewhere. In addition, ruler 
formatting and justification can be applied to the 
whole of the block. 

The main menu bar across the foot of the screen 
provides nine different menus including an exit from 
ArcWriter. The other functions covered In this way 
are: 

1. System Configuration - this covers choice of 
storage medium and printer. 

2. Document Configuration - page layout margins, 
headers, footers etc, 

3. Filing Functions - saving, loading, deleting text 
files. 

4. Search and Replace - this is case sensitive and 
cannot be changed. 

5. Page Location - go to any specified page. 

G. Printing Functions - allows first and last page for 
printing to be set, 

7. Provision of Information - gives information about 
current document and use of system resources. 

d. System Functions - this permits the use of star 
commands. 

I have only been able to spend a limited time 
with ArcWriter, but t like what 1 see, and could 
readily see myself using this for many of my 
Archimedes word processing requirements. My 
main concern is with the visual quality of the display 
as characters have a definite tendency to appear 
blurred, but that is a function of the system not just 
ArcWriter, In addition, ArcWriter has a noticeabie 
struggle to keep up when entering text at a 
reasonable (two finger) speed. Maybe ArcWriter 
doesn't provide all the features and sophistication of 
commercial word processors, but then it is all for 
free, at least to the user, fiT|] 
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A PRINTER BUFFER FOR THE ARCHIMEDES. 


By NEc Van Someren 


O.S. 1.2 only 


Use this robust Printer Buffer to free your computer during long printouts 
- whether of text files or programs. 


The printer buffer described here assembles 
as a relocatable module which will provide a 
variable size printer buffer for your Archimedes. 
You can set it to just 100 bytes, or to half a 
megabyte if you wish. Once turned on, the 
buffer will operate automatically whenever the 
printer is engaged, and its contents will remain 
Intact even if Escape or Break are pressed; 
though it is cleared on Ctrl- or Shift-Break and 
on Reset. It also has an emergency Clear 
lability, actioned by pressing the ALT key 
simultaneously with Escape. 

RUNNING THE PROGRAM 

First of all, type in the program carefully, and 
save it away. When it is run, if all goes well, it 
will create on disc a relocatable module file 
called BufModule, You can then load this by 
typing: 

*BUFMODULE 

Or +RMLOAD BUFMODULE 

To check that all is well, type: 

*MODULES 

This should show that the module is present. 
Typing ‘HELP COM. should give further details. 
The module also responds to: 

*HELP BUFFER 
and * HELP BUFFERSIZE 

As you will see from this, the buffer is 
switched on and off with "BUFFER ON and 
‘BUFFER OFF (the space before the 
parameters "ON" and "OFF" is essential). You 
can find the current buffer size (default size 
16K) by typing: 

‘BUFFERStZE 


This Printer Buffer program will form a 
part of a forthcoming book on the Arthur 
Operating System from Dabbs Press, We 
are most grateful to Nic Van Someren, the 
program author, and to Dabbs Press for 
permission to publish it here. 


The allocation may be altered at any time that 
the buffer is in an OFF state by typing: 

"BUFFERSIZE n 

where n is the size in bytes. This is decimal by 
default, but may be preceded with for hex, 
or everT2_" if you are giving the new size in 
binary. 

The buffer appears to be extremely robust. 
There are just two provisos to note. Firstly, the 
contents of the buffer, but not the buffer itself, 
are lost under an ‘RMTIDY - but this is unlikely 
to be a problem. Secondly, because of what 
appears to be a bug in Arthur 1.2, you cannot 
extend the buffer size (using "BUFFERSIZE) if 
another relocatable module has been loaded 
above the buffer, or indeed if workspace for 
another module has been allocated above the 
buffer. In practice the problem is avoided by 
ensuring that the buffer is the last module to be 
loaded. So if you are using a SBOOT file to set 
up the RISC User Disc Menu and the Buffer, 
the relevant lines might appear as follows: 

QUIT 

*RMENU 

*BUFMODULE 

* buffers I ze £8000 (Allocate 32K) 

*BUFFER ON 

*menu (Call the Menu) 


This program is featured on this month's magazine 
disc For further details, see the back cover. 


10 REM >BufSource4 

20 REM Program Printer Buffer 

30 REM Requires OS Series One 

40 REM Version A 1.04 

50 REM Author Nic Van Someren 

60 REM RISC User Jan/Feb 1988 

70 REM Program Subject to copyright 

80: 

90 DIM Q% 4000 
100 FOR 1-4 TO 7 STEP 3 
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A PRINTER BUFFER FOR THE ARCHIMEDES 


110 P%=0:O%=Q% 

120 [OPT I 
130/Module Header 
140 EQUD 0 
150 EQUD initialise 
160 EQUD finalise 
170 EQUD service 
180 EQUD title 
190 EQUD helpstring 
200 EQUD helptable 
210 EQUD 0;SWI chunk 
220 EQUD 0;SWI handler 
230 EQUD 0;SWI table 
240 EQUD 0;SWI code 
250.title 

260 EQUS "PrinterBuffer" 
270 EQUB 0 
280 ALIGN 
290.helpstring 
300 EQUS "Printer Buffer”* 
CHR$9+"1.04 (16 Dec 1987)” 
310 EQUB 0 
320 ALIGN 
330.helptable 
340 EQUS "Buffer" 

350 EQUB 0 
360 ALIGN 

370 EQUD bufcommand 

380 EQUD 400010001;flags 

390 EQUD syntax 

400 EQUD bufhelp 

410 EQUS "BufferSize" 

420 EQUB 0 
430 ALIGN 

440 EQUD sizecommand 
450 EQUD 400010100 
460 EQUD sizesyntax 
470 EQUD sizehelp 
480 EQUD 0 
490.bufhelp 

500 EQUS "‘Buffer turns bu 
ffer ON or OFF" 

510 EQUB 13 
520 EQUB 10 
530.syntax 

540 EQUS "Syntax: ‘Buffer 
<ON|OFF>" 

550 EQUB 0 
560.sizehelp 

570 EQUS "‘BufferSize with 
out a parameter gives the si 
ze of the extra buffer" 

580 EQUB 13 

590 EQUS "With one paramet 
er, the value is taken as th 
e new buffer size" 

600 EQUB 13 
610.sizesyntax 
620 EQUS "Syntax: ‘Buffers 
ize [<size>]" 


630 EQUB 0 - 

640 ALIGN 
650.bufcommand 
660 LDR R12, [R12] 

670 LDR3 R2,[R0],fl 
680 ORR R2,R2,1420 
690 CMP R2,#ASC"o" 

700 BNE badonoff 
710 LDRB R2,[R0],#1 
720 ORR R2,R2,#420 
730 CMP R2,#ASC"n" 

740 BEQ setup 
750 CMP R2,fASC"f" 

760 BNE badonoff 
770 LDRB R2,[R0),#1 
780 ORR R2,R2,#420 
790 CMP R2,#ASC"f" 

800 BEQ setdown 
810.badonoff 
820 ADR R0,bufneedonoff 
830 ORR R14, R14, f l«28;Set 
V flag for error 
840 MOVS PC,R14 
850.bufneedonoff 
860 EQUD 400123456 
870 EQUS "‘Buffer needs ON 
or OFF after it" 

880 EQUB 0 

890 ALIGN 

900.sizecommand 

910 STMFD R13!,{R14} 

920 MOV Rll, R12 
930 LDR R12,[R12] 

940 CMP Rl,#0 
950 BEQ tellsize 
960 ADR R2,areweon 
970 LDR R2,(R2) 

980 CMP R2, #0 
990 BNE changewhileon 
1000 MOV Rl,R0 
1010 MOV R0,110 
1020 SWI "OS_ReadUnsigned" 
1030 ADD R2,R2,#17 
1040 LDR R10,[R12,#4] 

1050 MOV R9,R2 
1060 SUB R3,R2,R10 
1070 MOV R2,R12 
1080 MOV R0,#13 
1090 SWI "OS_Module" 

1100 CMP R0,113 
1110 BNE osmodulebug 
1120 STR R2,[Rll] 

1130 MOV R3,R9 
1140 STR R3,[R2,#4] 

1150 MOV R3,#410 
1160 STR R3,[R2] 

1170 STR R3,[R2,#8] 

1180 STR R3,[R2,#12] 

1190 LDMFD R13!,{PC} 

1200.tellsize 


1210 SWI "OS_WriteS" 

1220 EQUS "The extra printe 
r buffer is ” 

1230 EQUB 0 

1240 ALIGN 

1250 LDR R0,[R12,f4] 

1260 SUB R0,R0,#17 
1270 ADR Rl,numbuffer 
1280 MOV R2,111 
1290 SWI "OS_ConvertCardina 
14” 

1300 SWI "OSWriteO" 

1310 SWI "OS_WriteS" 

1320 EQUS " bytes long." 

1330 EQUB 13 

1340 EQUB 10 

1350 EQUB 0 

1360 ALIGN 

1370 LDMFD R13!,{PC} 

1380.osmodulebug 
1390 LDMFD R13!,{R14} 

1400 ORR R14, R14, #1«28 
1410 MOVS PC,R14 
1420.changewhileon 
1430 LDMFD R13!,{R14} 

1440 ADR R0,changetext 
1450 ORR R14, R14, #1«28 
1460 MOVS PC, R14 
1470.changetext 
1480 EQUD 400123457 
1490 EQUS "Buffer must be O 
FF before changing size" 

1500 EQUB 0 

1510 ALIGN 

1520.numbuffer 

1530 EQUD 0 

1540 EQUD 0 

1550 EQUD 0 

1560.initialise 

1570 STMFD R13!,(R14) 

1580 MOV Rl,R12 
1590 LDR R12,[R12] 

1600 CMP R12,10;Check if al 
ready initialised 
1610 BNE startmeup 
1620 MOV R0,16 
1630 MOV R3, #44000; «< TH 
IS IS THE DEFAULT SIZE (16K) 
1640 SWI "OS_Module" 

1650 STR R2,[Rl] 

1660 MOV R12,R2 
1670 STR R3,[R12,#4] 

1680 MOV R3,#410 
1690 STR R3,[R12] 

1700 STR R3, [R12,#8) 

1710 STR R3, [R12,#12] 

1720.startmeup 
1730 LDMFD R13!,{PC) 

1740.finalise 

1750 STMFD R13!,{R14J 
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A PRINTER BUFFER FOR THE ARCHIMEDES 


1760 LDR R12,[R12] 

1770 BL setdown 
1780 CMP R10,#0 
1790 MOV R0,#7 
1800 MOV R2,R12 
1810 SWINE "OS_Module" 

1820 LDMFD R13l,{PC} 

1830.service 
1840 CMP Rl,#&27 
1850 MOVNE PC,R14 
1860 STMFD R13!,{R0,R1} 

1870 ADR Rl,areweon 
1880 MOV R0,#0 
1890 STR R0, [Rl] 

1900 LDMFD R13!,{R0,R1} 

1910 MOV PC, R14 
1920.areweon 
1930 EQUD 0 

1940;+0 is start of buffer 
from 0 

1950;+4 is end of buffer fr 
om 0 

1960;+8 is the point for in 
sertion 

1970;+12 is the point for r 
emoval 

1980.nextval;Increment R4 
1990 LDR R5,[R12,#4] 

2000 ADD R4,R4,#1 
2010 CMP R4,R5 
2020 LDREQ R4,[R12] 

2030 MOVS PC, R14 
2040.isempty;Empty test 
2050 LDR R4,(R12, #8] 

2060 LDR R5,[R12,#12J 
2070 CMP R4,R5 
2080 MOV PC,R14 
2090.isfull;Full test 
2100 STMFD R13!,{R14} 

2110 LDR R4,[R12,#8] 

2120 BL nextval 
2130 LDR R5,[R12, #12] 

2140 CMP R4,R5 
2150 LDMFD R13!,{PC) 

2160.topush;Byte to buff 
2170 STMFD R13!,{R14} 

2180 BL isfull 

2190 LDMEQFD R13!,{R14) 

2200 ORREQS PC,R14,#1«29 
2210 LDR R4,[R12,#8] 

2220 STRB R0, [R12,R4] 

2230 BL nextval 
2240 STR R4,[R12,#8} 

2250 LDMFD R13!,{R14) 

2260 BICS PC, R14, #1«29 
2270.topull;Byte from buff 
2280 STMFD R13!,{R14} 

2290 BL isempty 
2300 LDMEQFD R13!,(R14} 

2310 ORREQS PC,R14,#1«29 


2320 LDR R4, [R12,#12] 

2330 LDRB R0, {R12,R4] 

2340 MOV R2,R0 
2350 TST R6,#l«28 
2360 BLEQ nextval 
2370 STR R4,[R12,#12] 

2380 LDMFD R13!,{R14} 

2390 BICS PC,R14, #1«29 

2400.toaltflush 

2410 STMFD R13!,{R0,R1,R2,R 

14} 

2420 MOV R0,I&81 
2430 MOV Rl,#&FD;ALT key 
2440 MOV R2,f&FF 
2450 SWI "OS Byte" 

2460 CMP Rl,?6FF 

2470 LDMFD R13!,{R0,Rl,R2,R 

14} 

2480 MOVNE PC,R14 
2490 LDR R4,[R12] 

2500 STR R4,[R12,#8] 

2510 STR R4, [R12,*12] 

2520 MOV PC,R14 
2530.tocountpurge 
2540 TST R6,#l«28 
2550 BNE toaltflush 
2560 STMFD R13!,(R14} 

2570 TSTP R6,R6 
2580 LDRCS R4,[R12,#8] 

2590 BLCS nextval 
2600 LDRCS R5,[R12,#12] 

2610 LDRCC R5,[R12,#8] 

2620 LDRCC R4,[R12,#12] 

2630 SUBS Rl, R5,R4 
2640 BHI posspace 
2650 LDR R4,[R12) 

2660 LDR R5,[R12,#4] 

2670 ADD Rl, Rl, R5 

2680 SUB Rl,Rl,R4 

2690.posspace 

2700 MOV R2,Rl,LSR #8 

2710 LDMFD R13!,{PC) 

2720.myinsv 

2730 CMP Rl,#3 

2740 MOVNES PC,R14 

2750 STMFD R13!, {R0, Rl, R4, R 

5) 

2760 BL topush 

2770 LDMFD R13!,{R0,Rl, R4, R 

5, PC} 

2780.myremv 

2790 STMFD R13!,{R6} 

2800 MOV R6, PC 
2810 CMP Rl> #3 
2820 LDMNEFD R13!,{R6} 

2830 MOVNES PC,R14 

2840 STMFD R13!,{Rl,R4,R5} 

2850 BL topull 

2860 LDMFD R13!,{Rl,R4,R5, R 

6, PC} 


2870.mycnpv 

2880 STMFD R13!,{R6) 

2890 MOV R6, PC 
2900 CMP Rl, #3 
2910 LDMNEFD R13!, {R6} 

2920 MOVNES PC,R14 
2930 STMFD R13!, {R4,R5| 

2940 BL tocountpurge 
2950 LDMFD R13!,{R4,R5,R6,P 
C} 

2960.setup 

2970 STMFD R13!, {R14) 

2980 ADR Rl,areweon;Get add 
ress of ON flag 
2990 LDR R0,[Rl];Load flag 
3000 CMP R0,#0;Test if zero 
3010 LDMNEFD R13!,(PC);If n 
ot, buffer is running 
3020 MVN R0,#0;Set flag 
3030 STR R0,[Rl] 

3040 MOV R2,R12 

3050 LDR R0,[R12];Empty buf 

3060 STR R0,[R12,f8] 

3070 STR R0,[R12,#12] 

3080 MOV R0,#414 
3090 ADR Rl,myinsv 
3100 SWI "OS_Claim" 

3110 MOV R0,#415 
3120 ADR Rl,myremv 
3130 SWI "OS_Claim" 

3140 MOV R0,#&16 
3150 ADR Rl,mycnpv 
3160 SWI "OS_Claim" 

3170 LDMFD R13!,{PC} 

3180.setdown 

3190 STMFD R13!, {R14} 

3200 MOV R2,R12 

3210 ADR Rl,areweon;ON test 

3220 LDR R0, [Rl} 

3230 CMP R0,10 

3240 LDMEQFD Rl3!,{PC} 

3250 MOV R0, #0 
3260 STR R0,[Rl] 

3270 MOV R0,#&14 
3280 ADR Rl,myinsv 
3290 SWI "OS_Release" 

3300 MOV R0,I&15 
3310 ADR Rl,myremv 
3320 SWI "OSRelease" 

3330 MOV R0,#&16 
3340 ADR Rl,mycnpv 
3350 SWI "OS_Release" 

3360 LDMFD R13!, {PC] 

3370 ]:NEXT 

3380 OSCLI"SAVE BufModule " 
+ STR$-Q%+"+"+STR$''P% 

3390 OSCLI"SETTYPE BUFMODUL 
E FFA" 


8 
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ARCHIMEDES SCREEN SUPER-SAVER 


Lee Calcraft presents a fast, legal screen-save routine that takes the palette into account, 
and copes with differently configured systems. 


Three programs are presented here. The 
first two are EXEC files, and should be entered 
without line numbers (use Wordwise, Twin or 
‘BUILD). They should be saved with the names 
FASTSAVE and FASTLOAD in the Library 
directory of your disc, and should be given a file 
type of &FFE (‘SETTYPE filename FFE). Now, 
if you type ‘FASTSAVE, a filename will be 
requested. Enter the name of the screen 
(previously saved using ‘SCREENSAVER The 
EXEC file will load in the screen, and create 
two new files: one called Name+ (where Name 
is the original name of the screen) containing 
palette information, and the other, called 
Name=, containing the screen itself. You can 
now delete the original screen if you wish. 


The third program sets up a slide show 
using the "FastLoad" principle. The screens 
must all have been subjected to the FastSave 
routine, and their names placed in the last line 
of the program in place of the four given. The 
word "END" is used as a terminator. 

Notes: 

All 3 routines use OS_ReadVDUVariables 
(&31) to read the screen base address, and the 
save routine also uses this call to obtain the 
screen size. The palette is saved by setting the 
graphics window to zero size, and using 
‘SCREENSAVE to save a single graphics pixel 
together with mode and palette information. The 
screen itself is saved using a straight ‘SAVE. 


If you now type ‘FASTLOAD, and supply 
the screen name e.g. Name (no "+" or "=" 
needed), the mode and palette will 
automatically be set up, and the screen loaded 
- all in about one quarter of the time taken by a 
•SCREENLOAD command. 


*| >FastSave 

*1 

MODEO:VDU21,26:DIM B% 30 
B%=((B%+3)DIV4)*4:!B%=148 
!(B%+4)=7:!(B%+8)=-l 

VDU6:INPUT"Filename n file$:OS.("SCREEN 
L. "+file$):file$=LEFT$(file$,9):SYS 
&31,B%,B%+&10:Z%=!(B%+&10):L%=!(B%+ 
&14):OFF:VDU24|:OS.("SCREENS."+file$ 
+ "+"):OS.("SAVE "+file$+"= "+STR$-Z% 
+ " +"+STR$*"L%) :0N 

* I >FastLoad 

"I 

MODEO:VDU21,26:DIM B% 30 
B%=((B%+3)DIV4)*4;!B%=148 
! (B%+4)=-lSYS 

&31,B%,B%+&10:Z%=!(B%+&10) 

VDU6:INPUT"Load Filename "file$:OS.(" 
SCREEN^L."+file$+"+"):OS.("LOAD"+fi 
le$+"= "+STR$-Z%) 


10 REM >FastShow 
20 REM Fast-Load Slide Show 
30 REM By Lee Calcraft 
40 : 

50 MODE 0:DIM B% 30:Z%=FNaddr 
60 REPEAT:RESTORE 
70 REPEAT 
80 READ file$ 

90 IF file$o"END" THEN PROCload(file 
$):OFF 

100 A=INKEY(500) 

110 UNTIL file$="END” 

120 UNTIL FALSE 
130 : 

140 DEFFNaddr 
150 B%=((B%+3)DIV4)*4 
160 !B%=148: ! (B%+4)=-l 
170 SYS &31,B%,B%+&10 
180 =!(B%+&10) 

190 : 

200 DEFPROCload(fileS) 

210 OSCLI("SCREENL. "+file$+"+") 

220 OSCLI("LOAD "+file$+"= "+STR$~Z%) 
230 ENDPROC 
240 : 

250 DATA GARDEN, IMAGE1, IMAGE2, IMAGE3,E 


123 
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LOGiSTiX- for the Archimedes 

Reviewed by Mike Williams 


Logistix is the first new major application for the 
Archimedes marketed by Acorn, and thus deserves 
particular attention at this time. It provides a 
significant spreadsheet facility combined with 
database and time management functions (of which 
more later), all of which can form the basis for some 
impressive graphical displays. 

Logistix is not a brand new product, having 
been available for the IBM PC (and its clones) for 
some time as well as for the Atari ST range. 
Logistix has been transferred onto the Archimedes 
(it was originally written in C) and is sold by Acorn 
under the Acornsoft brand name. Logistix may be 
the first applications product converted for the 
Archimedes from other machines, but you can be 
sure it won’t be the last. 

Logistix is an impressive product in many ways. 
It consists of two discs together with a hefty two- 
part manual, a multi-page reference card and a 
keystrip, all packaged in two of Acorn’s now 
standard large-size packs. The manuals are, with 
one glaring failure, well written and produced. As for 
the software, insert the master disc, type in a single 
command and the Logistix screen appears. 

Anyone at all familiar with Acorn’s View 
Professional will immediately recognise the 
fundamental concepts of Logistix. The screen 
display (apart from the generated graphics) always 
presents a spreadsheet style of layout with rows 
and columns. It is on this basic 'worksheet' that the 
intricacies of spreadsheets, database handling, 
time management and even some word processing 
are played out. 

Many potential users may well feel daunted at 
their first sight of Logistix. The software indulges in 
none of the colourful windows and icons beloved of 
other software packages produced for the 
Archimedes, and you might as well throw the 
mouse away altogether. What Logistix does offer is 
a powerful and highly integrated package that does 
not get in your way when solving problems. 

The 'cell cursor' can be moved about the 
worksheet with the usual cursor keys, and the Page 
Up, Page Down, Home and End (or Copy) keys 
also perform their expected functions. The 
spreadsheet is an enormous 1024 columns by 2048 
rows, so large that several different activities 
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relating to the same task can be set up in different 
parts of the same worksheet. Twenty-seven of the 
worksheet rows are visible on the screen at any 
time, with four additional lines at the foot of the 
screen for user communication. These are the 
status line, the prompt line, the help line and the 
entry line. All input is clearly prompted with a single 
line of help information, while screenfuls of help text 
are available on virtually everything that Logistix 
can do. 

SPREADSHEET 

It is probably as a spreadsheet that Logistix will 
most often be used. Individual cells may contain 
text, values or expressions. Expressions, 
referencing other cells can use the basic arithmetic 
(+ - * / A ) and logical operators (=<>>< >= >=), 
and nearly 30 mathematical functions (trig, 
hyperbolic etc). Formulae are easily replicated, 
either by direct input of the appropriate cell 
references, or by moving the cell cursor to the same 
cell positions. I found no difficulty in setting up a 
spreadsheet for some of my own data, and quickly 
learnt how to manipulate this. 

DATABASE 

To operate Logistix as a database the columns 
of the spreadsheet layout are set up as fields 
(column widths can be varied by the user), and the 
rows correspond to individual records. Data of all 
kinds can be entered in the same way as for a 
spreadsheet, and by using cell references, it is very 
easy to link spreadsheet and database together. 
There are a number of specific database functions 
(for summation, counting, averaging etc) and the /T 
command provides sorting and searching functions. 
Records may only be sorted on one whole key field 
at a time, but successive sorts produce nested key 
sorts. With a maximum 64 fields and 2047 records, 
Logistix' capabilities as a database are clearly 
limited, but should be quite adequate for the context 
and expected use. 

TIME MANAGEMENT 

Logistix can handle the scheduling of resources 
(including people) over time, including critical path 
analysis. The software has a built in calendar that 
can be tailored to any particular task. For example, 
if you decide that a day is the basic unit of time 
appropriate to a job. you can specify which days in 
the calendar, and which hours per day are work 
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time. Once created, the calendar is then linked to 
any selected column of the spreadsheet, and 
following days (if day is the basic time unit} occupy 
successive columns to the right. Resources can 
then be scheduled with the help of Logistix, and a 
critical path determined if this is appropriate. 

There are many functions specific to time 
management, in fact too numerous to mention. In 
any case, scheduling a range of activities will take 
much less time than it would to describe. Again, by 
extensive use of ceil references, the timesheet part 
of your worksheet can be easily linked to both 
spreadsheet and database applications. Thus a 
change to any parameter will propagate throughout 
ALL related celfs. 



GRAPHICS 

The fourth prime function of Logistix is to allow 
all kinds of data held and generated in a worksheet 
to be displayed graphically. This uses a special 
graphics language to generate any of eight different 
types of chart (stacked bar charts, clustered bar 
charts, pie charts, line graphs, stepped graphs, 
spread and tick charts, scattergrams and Gantt 
charts * for work scheduling). Note, though, that the 
graphics produced are identical to those on the PC 
■ none of the Archimedes' full range of colour and 
shade for example. 

Using windows, up to four different charts may 
be shown on the same screen. Again, reference to 
cells (rather than to their contents) means that once 
a graph display has been programmed, any 
changes to the underlying values will automatically 


be reflected in the graphical representation. Graphs 
may also be output to a range of dot matrix printers 
(Including the Epson range), and to a good many 
graph plotters. The graphics incorporate a number 
of fonts for stylish text, but I fear that legends and 
captions are not always that clear on the standard 
Archimedes colour screen. 

MANUAL 

fn part one, the first 35 pages provide an 
excellent introduction to Logistix based around an 
example file supplied on disc. This gets across the 
fundamental features of spreadsheet, database, 
timesheet and graphics. BUT, and this is really an 
unforgiveable if understandable failure, the 
illustrations and the text all relate to a 20 row screen 
(standard for the PC) and thus all the cell 
references In the text are out of step with the screen 
display seen by the user (showing 27 rows)! In 
addition l noted four misprints, which could well 
confuse the less experienced user, and there couid 
be more. 

Apart from that, I thought that the two-part 
manual was clearly written and easy to follow, no 
mean feat with software as demanding as Logistix. 
The book also describes a further nine example 
Logistix tiles which are supplied on disc. 

CONCLUSION 

This abbreviated description of Logistix hardly 
does justice to its full potential, and much has been 
omitted, for example the facility to program macros, 
in reality, I suspect that it is only by using such 
software that you will come to appreciate its full 
value despite the absence of fancy windows, icons 
and the like. 

Two major features stand out: the obvious 
power and speed that this software can provide on 
an Archimedes, and the way you can efficiently and 
directly create the applications you need. If you 
want a thoroughly businesslike environment for 
spreadsheet and timesheet applications then there 
is nothing to beat Logistix on an Archimedes, and 
the graphics are a real bonus, ff you really want a 
sophisticated database (or word processing) 
package then look elsewhere. But Logistix does 
what it Is designed to do superbly well. 
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Lee Calcraft describes how to use anti-alias fonts with a minimum of brain-strain. 


The Tutorial and Demonstration files on the 
Welcome disc show the user what can be done 
using the special so-called "Fancy Font" facility on 
the Archimedes, A special Font Manager module 
resident in ROM is used to reproduce selected 
typefaces in a multitude of different sizes from font 
files supplied on the Welcome disc. The result is 
quite impressive, though if you try to use these 
fonts at a much greater point size, the letters begin 
to look a little moth-eaten. The Series One 
Welcome disc contains two sets of font files, one for 
a typeface called Trinity which looks similar to 
Times Bold, and another called Corpus which is 
reminiscent of the Courier typeface. 

The way in which these fonts are used relies on 
a technique called "anti-aliasing". This essentially 
involves removing the jagged edges from displayed 
characters by replacing pixels which should be half 
on and half off, by ones of an intermediate shade. 
The demonstrations on the Welcome disc use 8 
different shades of pixel to create their effect. 

Of course, there is much more to using the 
Archimedes Fancy Fonts than anti-aliasing, and, as 
is obvious from the Reference Manual, their user 
interface is really quite complex. There are many 
SWI calls, and VDU23 statements, all with masses 
of parameters. What I propose to do, therefore, is to 
present in the first instance a short program which 
will display some text in Fancy Fonts. Then we will 
take a look at a couple of procedures which parcel 
up the Fancy Font calls in a more manageable way. 

CONFIGURING FONT SIZE 

Before making use of the machines Fancy 
Fonts, you will need to allocate a block of RAM for 
storing font data. To do this, type: 

*CONFIG. FONTSI ZZ 10 
Then press Ctrl-Break. This allocates 40K of font 
space (10 "pages" of 4K), which will be sufficient for 
experimenting with fonts of up to around 35 point. If 
you are using a 305, there should still be no 
problems with this setting, providing that your 
screen size is set to the default of 0 (i.e. 80K of 
screen RAM) - which is sufficient for running the two 
accompanying programs. 

SETTING UP YOUR DISC 

There are six stages to getting a Fancy Font 
onto the screen. The first involves setting up a disc 
with the correct font files. The remaining five steps 
may be executed in five lines of Basic, as we shall 
see in a moment. To prepare your disc, you will 


need to have on it a directory called FONTS. This 
must have a sub-directory with the name of the font 
which you will be using (either Trinity or Corpus), 
This directory must itself contain a further directory 
called MEDIUM. Finally MEDIUM must contain two 
files, called intMetrics and x 90y45. These contain 
seating data for the fonts, and actual pixel data for 
each character, respectively. Put another way, if 
you are using the Trinity font, your disc should 
contain the two files: 

$.FONTS.TRINITY.MEDIUM.InLMetrics 

$.FONTS,TRINITY.MEDIUM.x90y4 5 

The simplest way to achieve this Is to copy the 
whole directory called $.FONTS.TRINITY from the 
new Welcome disc, complete with Its sub-directory 
and files. First create the directory $, FONTS on 
your work disc, then type: 

*C0PY :0.$,FONTS.TRINITY : 0.$.FONTS.TR 

INITY QPRF 

and follow the prompts. The pair of files will use 
around 4QK of disc space. 

RUNNING THE PROGRAM 

Once you have done this, you may run the 
program given in Listing 1. It should produce a 
display similar to that in the accompanying 
photograph. You will note that the time displayed is 
around 6 seconds. If you now run the program a 
second time, you should get a better result by a 
factor of 60 or more. This is because when the 
program is first run, the Font Manager must load the 
font data from disc, and store it in the so-called font 
cache. The second time around, there is no need 
for this. As you will appreciate, this is a very 
creditable result from a speed point of view, it is 
certainly fast enough for use within a word 
processor, as Acorn have demonstrated with 
Arc Writer, 



1. Output from listing 1 (when RUN for the 
first time - subsequent runs will give a faster 
time displayed) 
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The Font Manager provides a special 
command, "FQNTLIST for checking the state of the 
font cache. Ef you issue this now, you should see a 
display similar to that in the accompanying screen 
shot. This lists Trinity 20x40 point (i.e. Trinity font 
with horizontal point size 20, and vertical point size 
40) as the only currently cached font. Ef reveals that 
the cache has 40K allocated to It, and that 24K of 
this is still free. We will return to this display later in 
the article. But now we will take a look at the five 
lines of Basic referred to earlier. 



2. Output from typing *FONTLIST after 
running prog 1. 


Listing 1 

10 REM >Fontteat6 

20 REM Anti-Alias Font Demonstration 
30 REM By Leo Calcraft 
40 REM Calls Trinity font files 
50 : 

60 MODE12;TIME=0 
70 \ 

30 REM Set Font Directory 
90 *SET Font$Frefix $,FONTS 
100 : 

110 REM Set Transfer Function 
120 VOU23,25,3,2,4,6,8,10,12,14 
130 : 

140 REM Set Anti-Aliasing Palette 
150 VDU 23,25,&B8,9,0,0,0,&FD,SFQ,£FO 
160 i 

170 REM Cache required Font 
130 SYS "Font_FindFont n w 11 Trinity.Medi 
20*16,40*16,0,0 
190 : 

200 $$="TRINITY FONT - 20x40 point” 

210 REM Paint Font 
220 SYS "Fcnt_Paint", r S$i 610,0, 300 
230 : 

240 S$="l 234567390+=- !@#$ 

r&M ) [)<>?” 

250 REM Paint Font 

260 SYS "Font_Paint",,S$, £10, 0 , 600 

270 : 

280 S$-" Time taken = "+STR$ (TIME/1Q0)+ 
" seconds" 

290 SYS "Font_Paint",,S$,£10, 0, 400 


WHAT THE PROGRAM DOES 

The first key statement in the program given in 
listing 1 appears at fine 90. Ets function is just to tell 
the Font Manager where to find the relevant font 
files, in this particular case, the command informs 
the Font Manager that the TRINITY directory, with 
its nested contents is located in $.FONTS. The next 
instruction, at line 120, sets up the so-called 
Transfer Function for the anti-aliasing. It determines 
how many gradations will be used in the anti¬ 
aliasing palette, and at what levels of brightness 
these shades will be used. The user can select 2, 4, 
8 or IS levels, the latter requiring a 256 colour 
mode. In our example we have used 8 levels of 
shading. If you are using 4 levels only, you could 
replace this line by VDU23,25,2,4,8 1 12|. For further 
details of this rather nasty VDU call the reader is 
referred to the Reference Manual. 

ANTI-ALIASING PALETTE 

The next call, made in line 150, shares its first 
two parameters {23,25} with the Transfer Function, 
Its syntax is: 

VDU23,25,bcg,startcol,0,0,rs,gs,bs, 

re,ge,be 

The variable beg specifies the background colour 
number, and must have &80 added to it In our 
exampEe, we are using colour 8 for the background, 
so the beg parameter Is &8Q + 8. The next 
parameter, started, defines the first colour number 
of the sequence of 7 to be used by the Font 
Manager for the anti-alias palette (7 + the 
background make up the total of 8 levels of 
shading). We have used colour 9 for this parameter 
in order to have a contiguous set of colour numbers 
for the palette. 

When the program is run, the Font Manager will 
create the anti-alias palette by re-defining logical 
colours 8 ~ 15 as a set of shades intermediate 
between the so-called start and end colours. These 
8 new shades will constitute the anti-aliasing 
palette. The start and end colours are defined in the 
remaining 6 parameters of the call, and will normally 
be the physical colours required by the user for the 
background and foreground of his text. These 6 
parameters are made up of two red-green-blue sets, 
each of whose parameters range in value from 0 to 
240 in steps of 16 (just as in the COLOUR n,r,g,b 
command - see RISC User Issue 2 page 24). 

Line 180 uses the operating system call 
"Font_FindFont" to teEl the Font Manager to set up 
and cache the Trinity font in point size 20 by 40 
The last call, made to "Font.. Paint", displays the text 
in the required font. The last two parameters of the 
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SYS call give the graphics co-ordinates of the start 
of the text string to be displayed. 

As you can see from the example, if you are 
continuing to use the same font in the same size 
and with the same anti-aliasing parameters, new 
lines of text can be printed by simple recourse to 
Font_Paint, Incidentally, for these operating system 
calls to work, the call name must be given exactly 
as it appears here. Any changes in case will not be 
accepted. Thus a SYS call to "Font_painr would 
fail. The so-caEied "underscore* character is 
made by pressing Shift, together with the key 
immediately below fl 0, 

PARCELLED PROCEDURES 

The program in listing 2 parcels up the various 
font calls into two procedures, PROCsetup and 
PROCwrlte. It is accompanied by three example 
calls which display different size text against the 3D 
background described in the Visuals columns 
elsewhere tn this issue. The first procedure, 
PROCsetup, has six parameters. These are the 
three RGB values for the background and 
foreground colours respectively, and again the 
range is 0 to 240 in steps of 16 for each. The call 
sets up the anti-aliasing palette for 8 shades, 
assigning logical colours 8 to 15 for the job. It needs 
to be called once only, then all printing in Fancy 
Fonts can be accomplished with calls to 
PROCwhte. This takes five parameters. The first is 
the text string to be printed, the second and third 
give the font size (horizontal point size followed by 
vertical point size), and the last two give the X and 
Y graphics co-ordinates of the start of the text. 


ACORN'S TRINITY FONT 


Teil it 30 by 30 Point 

Tttl ai SO by JO FV»l 


3. Output from running program 2. 

This procedure currently assumes the Trinity 
font by default To change it to Corpus, just replace 
the word "Trinity -1 by M Corpus" in line 150. if you are 
writing in a mixture of different font sizes, you may 
notice that the disc is accessed when new font 
sizes are called. You can avoid this by assigning a 
larger font space using “CONFIGURE FONTS1ZE. 
To see what fonts are currently cached, use 
‘FONTLfST. Any whose memory allocation is less 


than IK are held in header form only, implying that 
the Font Manager has deleted them to make room 
for other fonts. The "Use" parameter In the Fontlist 
display gives the number of times that a cached font 
has been called, and is used by the Font Manager 
to decide which font to delete when making space 
for new ones. 

If this brief article has whetted your appetite for 
anthaliased fonts, and you would tike to experiment 
further, try taking a took at the three programs in the 
Tutorials directory of the Welcome disc. These use 
a wider range of SYS Font calls to achieve centring 
and justification of text 

■ Listing 2 

10 REM >BarFont5 

20 REM Fancy Font Procedures 

30 REM by Lee Calcraft 

40 : 

50 MODE12:OFF 

60 PRQCbackground:REM Blue bar effect 

70 PROCsetup(0,112,208,240, 240, 240) 

SO PROCwrite("ACORN"$ TRINITY FONT",3 
0,35,200 ,894) 

90 PROCwrite("Text at 30 by 30 Point 11 ' 
,30,30,200, 702) 

ICO PROCwrite("Text at 20 by 30 Point" 
,20,30,200,604) 

110 PROCwrite ("Text at 20 by 20 Point 11 
,20,20,200,508) 

120 IF GET THEN C0L0UR128:0N:END 

130 :---— 

140 DEFPROCwrite(text$,xpoint,ypoi nt,X 

,Y) 

150 SYS "Font_FindFont",,"Trinity.Medi 
rnn M , xpoint*16,ypoint*16,0,0 

160 SYS tf Font_Paint", , textS,£10,X,Y 
170 ENDPROC 

180 :--- --—--- 

190 DEFPROCsetupfbackR,backG,backs,for 
eR,fgreG,foreB) 

200 *SET FontSPrefix S.FONTS 
210 VDU23,25,3,2,4,6,8,10,12,14 
220 VDU23,25,S8S,9, backR, backG,backB, f 
oreR,foreG,foreB 
230 ENDPROC 

240 --------- 

250 DEFPROCbackground 

260 COLOURS,0,112,208:COLOUR4,0,0,0 

270 COLOURS,0,160,240 

280 COLOURS,192,240,176:QC0L128+3:CLG 

290 FOR Y=G TO 1023 STEP 96 

300 GCOL5:RECTANGLE FILL Q,Y,1279,12 

310 GCOL4: RECTANGLE FILL 0,Y+12,1279,4 

320 NEXT:ENDPROC 

330 ■- [21 
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Arrays and Matrices 


Mike Williams Investigates the powerful matrix operations provided in ARM Basic. 


Not only are arithmetic operations on the 
Archimedes very fast, but Basic V has been 
significantly enhanced to simplify the programming 
of matrix operations. As a result, many routines 
which would previously have required the use of 
nested FOR-NEXT loops and the like can now be 
programmed by simple assignments. For example, 
if we assume that a three dimensional array has 
been defined as: 

DIM array(20,20,20) 

and that we now wish to assign the value -1 to each 
element, then with no matrix operations we would 
have to write: 

FOR i-l TO 20 

FOR j-1 TO 20 

FOR Jc=l TO 20 

array(i,j,k)—-1 

NEXT k,j,i 

Instead, using ARM Basic we can write: 
array ()—l 

Not only is this much shorter, but an amazing 70 
times faster! 

In this short article I want to summarise some of 
the more useful features of Basic V for manipulating 
real or integer matrices (string arrays are allowed, 
but most of the following operations are just 
inappropriate). When an array is dimensioned, all its 
elements are set to zero, but any value n may be 
assigned to each element by writing: 
array ()-n 

If n is to be replaced with any kind of expression, 
then this will need to be completely enclosed in 
parentheses, e.g.: 

array()-(RND(l)*RND(l)) 

Otherwise some form of error message will result. If 
you need to increment or decrement all the 
elements of an array, then the W or w notation 
will work with arrays. For example: 
array ()+=SIN(x) 

would increment all elements of the array by the 
current value of SIN(x). 

All elements of an array may have the same 
quantity added, subtracted, multiplied or divided 
using the format: 

array()=array() <operation> <expression> 

where <operation> is any of +, * or / and 

<expression> is any valid arithmetic expression, 
enclosed in parentheses if it involves any 
operations. For example: 
array()-array()/(2*PI) 

would divide each element of array() by the value 
2 # PI. 
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You can also operate similarly on two arrays, 
but all arrays involved must have the same 
dimensions or an error will result. Such matrix 
operations take the form: 

arrayl()=array2() <operation> array3() 
where <operation> is again +, -, * or /. In this case, 
the operation applies to corresponding elements, so 
that: 

arrayl()=array2()*array3() 
would multiply corresponding pairs of elements 
together. 

True matrix multiplication is also possible using 
the V symbol (dot product). In all cases, the 
numbers of elements in appropriate rows and 
columns must be the same - this derives from the 
principles of matrix multiplication which is beyond 
the scope of this article. 

One other major improvement in Basic V is that 
arrays may now be legitimately included as the 
parameters of procedures and functions, and 
declared as LOCAL if required. Arrays so declared 
must also be dimensioned within the procedure or 
function definition, but this is not necessary for 
arrays passed as parameters. 

A number of other facilities have also been 
provided. DIM may be used dynamically to 
determine either the number of dimensions of an 
array, or the size of any dimension. For example: 

PRINT DIM(arrayO) 

would display the number of dimensions, while: 

PRINT DIM(array(),1),DIM(array(), 2) 
would display the size of array() as the number of 
rows followed by the number of columns. This 
information can also be used to dimension one 
array to be the same size as another, e.g.. 

DIM matrix(DIM(array(),1),DIM(array() ,2)) 
which would dimension matrix to be the same size 
as array. Lastly, the new keyword SUM will sum all 
the elements of an array. 

Basic V matrix operations clearly provide a 
powerful and convenient way of manipulating 
arrays. There are some omissions - you can't 
specify 'slices' (a particular row or column), which is 
a pity. Nevertheless, these new features will amply 
repay investigation and experiment. They are 
reasonably well described in the User Guide, but 
make sure you refer to the Addendum (if supplied). 

Elf] 
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This month s collection of visual effects includes routines to generate quadruple size 
shadowed text, and two different kinds of 3D backgrounds. 


8EMS-3/Z£D TIXT 

This routine is handy for producing smart 
looking titles and headings, without the need to 
resort to Acorn’s Fancy Fonts (dealt with 
elsewhere in this issue). The anti-alias fonts 
have a considerable overhead in disc storage 
and loading time, and are also the subject of 
strict copyright control. The method used here 
is compact and easy to use. It works in ail 
modes but 3, 6 and 7, though the selection of 
colours used in the accompanying program is 
not appropriate for 256 colour modes, and the 
3D effect may only be obtained in graphics 
modes with four or more colours. 

Whatever mode is in use (apart from 3, 6 or 
7), the routine will double both the height and 
width of the norma! text font. It is called with the 
format: 

PROCquad("Quad sized text”) 

or with: 

PROCquad(text$) 

where text$ holds the text to be printed. Before 
the call is made, the text cursor should be 
moved to the required start of text position 
using, for example: 

PRINT TAB(X,Y); 

If you are going to use the routine in your 
own programs, you will need tines 160 to 370, 
These contain a pair of procedures which read 
the computer’s currently selected font [not 
Fancy Font), and re define four new characters 
(characters 247-250) to make up a new extra 
large letter. This is repeated with each 
character output by the program. In addition 
you will need lines 50 and 60, which dimension 
two arrays, reserve some space, and define a 
string variable. 

The program which accompanies the 
routine makes use of POflCquad fn a special 
way. Here we have called the procedure twice 
with the same string of text, writing it in two 
different colours, and to two slightly different 
positions to give a shadowed, or 3D effect. In 
order to do this we have not used TAB to set 
the position of the text. Instead we have 


invoked VDU5 which causes text to be printed 
at the graphics cursor. Then, In lines 100 and 
120, we have MOVEd the graphics cursor to 
the required positions, immediately prior to 
calling PROCquad, 



The shadowed effect is achieved by writing 
first in a dark colour and then in a brighter one. 
You will see from line 80 that the dark colour 
used (colour 8) is not black (0,0,0) but a dark 
red ( 80 , 0 , 0 ). This, against a salmon pink 
background (colour 9) t ensures that the shadow 
will not be too harsh. Similarly, the foreground 
(colour 10) is not a pure white, but a slightly off- 
white (defined with RGB components 
192 , 192,192 in line 90 ), The size of the shadow 
is given by the degree of offset between the two 
MOVE statements referred to earlier. The 
parameters currently used work well in the 40 
and 80 column modes, but you may wish to 
increase the offset for mode 2 . You will also see 
that in mode 2, the present text string is too 
long, and overflows the line. Incidentally the 
routine uses OSWORD 10 to read the 
Archimedes' character definitions, and this 
correctly copes with the various fonts held by 
the machine, and selected with "ALPHABET, 

-'10 REM >Quad5 

20 REM Quad sized shadowed text 
30 REM By Lee Calcraft 
40 : 

50 DIM BfS) ,C(8) ,D%10 
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60 quad$=CHR$(248)+CHR$(247)+CHR$(10) 
+CHR$(8)+CHR$(8)+CHR$(250)+CHR$(249)+CHR 
$( 11 ) 

70 MODE12:VDU5 

80 COLOUR9,208,80,80:COLOUR8, 80,0,0 

90 COLOUR10,192,192,192:GCOL128+9:CLG 
100 GCOL8:MOVE 100,600 
110 PROCquad("RISC USER Magazine") 

120 GCOLIO:MOVE94, 604 

130 PROCquad("RISC USER Magazine") 

140 VDU4:END 
150 : 

160 DEFPROCquad(text$) 

170 LOCAL A,I,N,Q,R,S 
180 FOR A=1 TO LEN(text$) 

190 PROCchread(ASC(MID$(text$,A,1))) 
200 FOR Q=0 TO l:FOR N=0 TO 7 
210 C(N)=0 
220 FOR 1=0 TO 3 

230 C(N)=C(N)-(2 A (2*1)+2 A (2*1+1))* ( (B ( 
N) AND 2 A (I+4*Q))>0) 

240 NEXT:NEXT 
250 FOR R=0 TO 1 
260 S=4*R 

270 VDU23,247+2*R+Q,C(S),C(S),C(S+l),C 
(S+l),C(S+2),C(S+2),C(S+3),C(S+3) 

280 NEXT:NEXT 
290 PRINTquad$; 

300 NEXT:ENDPROC 
310 : 

320 DEF PROCchread(I) 

330 LOCAL A:?D%=I 
340 SYS 7,&A,D% 

350 FOR A=0 TO 7 
360 B(A)=D%?(A+l) 

370 NEXT:ENDPROC 

THE PLINTH IffLCT 

The second program generates the square 
"plinth" shape shown in the accompanying 
photograph. As you will see from the listing, the 
routine for generating the effect has been 
parcelled up into a procedure for ease of use. 
PROCpIinth has a total of 7 parameters. The 
first two are the graphics coordinates of the 
bottom left corner of the plinth. The next is its 
width, and the fourth the number of graphics 
units between the inner and the outer boxes. 
Finally come the three numbers of the colours 
used for the plinth. They are supplied in the 
order: top left edges, front face, bottom right 


edges. In our program, these colours are set up 
in lines 60 to 80. To achieve the desired effect, 
some considerable care is needed in the choice 
of colour. 



TO REM >Plinth3 
20 REM Raised Plinth 
30 REM By Lee Calcraft 
40 : 

50 MODE12 

60 COLOUR9,192,192,192 
70 COLOUR10,144,144,144 
80 COLOUR11,80,80,80 
90 : 

100 PROCpIinth(0,0,1000,1000,50, 9,10,1 

1 ) 

110 PROCpIinth(850,612,280,280,40,9,10 

, 11 ) 

120 PROCpIinth(150,150,400,400,20,9,10 

, 11 ) 

130 END 
140 : 

150 DEFPROCplinth(X,Y,WX,WY,W,C1,C2,C3 

) 

160 GCOLC1:RECTANGLE FILL X,Y,WX,WY 
170 GCOLC3:MOVE X,Y:MOVE X+WX,Y 
180 PLOT85,X+WX,Y+WY 
190 GCOL7:LINE X,Y+WY,X+W,Y+WY-W 
200 GCOLC2 

210 RECTANGLE FILL X+W,Y+W,WX-2*W,WY-2 
*W 

220 ENDPROC 

Continued on page 30 

Next month’s RISC User will feature a 
m Colour Editor * allowing the easy selection 
of colours for effects such as this. 
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RISC USER MEMORY EDITOR 


By Barry Christie 


I O.S.a.2, 0.3, 1.2 f 


Display and edit the contents of user RAM with the RE3C User Memory Editor. 


The accompanying program, though 
relatively short, provides a full screen display of 
user memory in both hex and ASCII format, 
with scrolling in both directions, and with editing 
facilities in both hex and ASCII. In these 
respects it offers considerable advantages over 
the features provided by the debugging 
module, which is assembler orientated, and 
which does not provide full screen editing and 
bi-directional scrolling* 


To make use of the Memory Editor, first 
type in the program and save it away. When it 
is run, it requests a starting memory address in 
hex within a given range. The range offered is 
from zero to just below the machine's current 
setting of Ml MEM. If Return is pressed on a null 
entry, the start address will be set to the current 
value of PAGE. 



As you can see from the accompanying 
illustration, the display has three fields. These 
hold RAM addresses in 16 byte steps, and 
RAM contents in hex and ASCII respectively. In 
the case of the latter, unprintable ASCII codes 
are represented by a dot. To move around in 
RAM, use the cursor keys alone, or together 
with the Ctrl key. There are just two further 
keys to remember: Escape will terminate the 
program, while the "Print" key (to the right of 
function key f12) will send the currently 
displayed screen to your printer. 


When the Editor is run it starts off in hex 
editing mode, signified by the parentheses "()" 
around the active RAM location. To edit RAM, 
just enter new values in hex from the keyboard, 
high byte first. The digit entered will appear first 
in the low nibble position, and then be shifted to 
the left if a second entry is made. To edit in 
ASCII, press Tab, and you will see the 
parentheses altered to square brackets. Now, 
locations may be altered one byte at a time 
using any keyboard character. You should take 
great care about altering RAM, however, 
because if you alter the RAM which is used by 
the program itself, the program will crash. If this 
happens you should use CtrhBreak to dear 
your machine, and then reload the program. 

The Editor may easily be used to examine 
or edit the contents of any disc file. The best 
way to do this is to exit from the Editor by 
pressing Escape, then load the target file Into 
RAM using: 

*L0AD filename BQGO 
The location &BOO0 is well clear of the Editor 
program (providing that you have not altered 
PAGE from its default)* Then run the Editor, 
and give B000 as the RAM address to be 
examined. If you wish to resave an altered file, 
leave the Editor by pressing Escape, and type: 

*$AVE filename BO00 nnnn 
where nnnn is the address in memory of the 
end of your file. 

10 REM >MemEdit4 

20 REM Program Memory Editor 

30 REM Version A 0,4 

40 REM Author Barry Christie 

50 REM RISC User Jan/Feb 1963 

60 REM Program Subject to copyright 

70 : 

80 MODEO;VDU19, 0,24,174,174/174 
90 ON ERROR PROCerror:END 
100 PROCinitialise 
110 PROCmemoryeditor 
120 END 
130 : 
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140 DEF PROCmemoryeditor 

570 

ENDPROC 

150 REPEAT 

580 

; 

160 *FX 21,0 

590 

DEF PROCpageDD 

170 key%=GET 

1/ 600 memory%+=5l2 

ISO CASE key% OF 

610 

IF memory%<“bound2% THEN PROCpaged 

190 WHEN 0 i PROCcheckprint 

l/isplay(FALSE) ELSE memory*-=512:VDU7 

200 WHEN 9 : FROCtabkey 

620 

ENDPROC 

210 WHEN 136 : PROClineLL 

630 

: 

220 WHEN 137 : PROClineRR 

64 0 

DEF PROClinesub(changes%) 

230 WHEN 138 : PROClineDD 

650 

PROCcursor(1) 

240 WHEN 139 i PROClineUU 

660 

curpos %-=change$ % 

250 OTHERWISE i FRGCbytechange 

670 

IF curpos%<=cumin% THEN 

260 ENDCASE 

680 

memory%--l6 

270 UNTIL FALSE 

690 

IF memory%<boundl% THEN 

280 ENDPROC 

700 

curpos%+=change s %:memory % +=16: VDU7 

290 : 

710 

ELSE 

300 DEF PROClineLL 

720 

VDU30,11:curpos%+=16 

310 IF INKEY(-2) THEN PROCpageLL ELSE 

730 

PROClinedisplay(0,memory%) 

PROClinesub (1) 

740 

ENDIF 

320 ENDPROC 

750 

ENDIF 

330 : 

760 

PROCcursor £tabkey%) 

340 DEF PROClineRR 

770 

ENDPROC 

350 IF INKEY(-2) THEN FROCpageRR ELSE 

780 

: 

FROClineadd(l) 

790 

DEF FROClineadd(cbanges%) 

360 ENDPROC 

800 

PROCcursor(1) 

370 : 

810 

curpos%+=changes% 

330 DEF PROClineUU 

820 

IF curpos%>-curmax% THEN 

390 IF INKEY(-2) THEN PRGCpageUU ELSE 

330 

memory!+=16 

PROClinesub(16) 

840 

IF memory%>bound2! THEN 

400 ENDPROC 

850 

curpo£%-=change s %;memory%-=16: VDU7 

410 : 

S60 

ELSE 

420 DEF PROClineDD 

v/870 

VDU 31,0,31,10; curpos%-=l 6 

430 IF INKEY(-2) THEN FROCpageDD ELSE 

1/880 

PROCl inedi splay (31, memory %+4 96) 

FROClineadd(16) 

890 

ENDIF 

440 ENDPROC 

900 

ENDIF 

450 ; 

910 

PROCcursor (tabkey%) 

460 DEF PROCpageLL 

920 

ENDPROC 

470 PROCcursor(1):curpos%-=curpos% MOD 

930 


16:PROCcursor(t abkey%) 

940 

DEF PROCl inedi splay (taby%,address! 

480 ENDPROC 

) 


490 : 

950 

partl$=" ":part2$=" ";OFF 

500 DEF FROCpageRR 

960 

FOR bytes%“0 TO 15 

510 PROCcursor(1);curpos%+=l6-curpos% 

970 

byte%=bytes%?addre ss % 

MOD 16-1:PROCcursor(tabkey%) 

980 

part2$+=FNnumtochr(byte!):partl$+= 

520 ENDPROC 

" "+FNnumtostr(byte%,2) 

530 : 

990 

NEXT bytes! 

540 DEF PROCpageUU 

1000 

PRINT TAB(3,taby%)FNnumtostr(addre 

1/ 550 memory%““5l2 

ss%, 7); partlS i part2$; :ON 
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1030 DEF FROCpagedisplay (printer*) 

1040 IF printer* THEN VDU2 
KJIG50 FOR line%=0 TO 31 
1060 FROClinedisplay(line*,memory%+line 
%*16):IF printer* THEN VDUl r 10 
1070 NEXT line* 

1080 VDU3:PROCeursor(tabkey*) 

1090 ENDFROC 
1100 : 

1110 DEF PROCcheckprint 
1120 printkey=GET 
1130 IF printkey=128 THEN 
\f 1140 COLOUR 0:COLOUR 129:PRINT TAB(3,31 
SPRINTING"; 

1150 COLOUR 1:COLOUR 128:FROCpagedi spl a 
y(TRUE) 

1160 ENDIF 
1170 ENDPROC 
1180 : 

1190 DEF PROCbytechange 
1200 PROCtabxy:IF tabkey* THEN PROCkeyv 
alue else PRQChexvalue 
1210 ENDFROC 
1220 : 

1230 DEF PROCtabxy 

1240 ehar*-curpos* MOD I6:tabx%=char%*3 
+11:taby*=curpos* DIV 16 
1250 ENDPROC 
1260 : 

1270 def FROCkeyvalue 
1280 PROCprintvalue:PROCIineRR 
1290 ENDPROC 
1300 ; 

1310 DEF PROChexvalue 
1320 key%=!NSTR("00112233445566778899Aa 
BbCcDdEeFf n ,CHR$key%)-1 
1330 IF key*>=0 THEN key*=key*>»l:key* 
+={curpos*?memoryl AND &QF)«4:PROCprint 
value 

1340 ENDPROC 
1350 : 

1360 DEF PROCprintvalue 
1370 curpos%?metnory*=key% 

1380 PRINT TAB(tabx%+l,taby*)FNnumtQStr 
(key*,2); 

1390 PRINT TAB<chrpos%+char%,taby*)FNnu 
mtochr(key*); 

1400 ENDFROC 
1410 i 

1420 DEF PROCtabkey 


1430 tabkey*=NOT (tabkey*) :PR0Ccursor(ta 
bkey£) 

1440 ENDPROC 
1450 : 

1460 DEF PROCcursor (bracket*) 

1470 CASE bracket* OF 
1480 WHEN -1 : bracket("+skip$+")” 
1490 WHEN 0 : bracket$="["+skip$+"3" 
1500 WHEN 1 : bracket $=" "+skip$+” ™ 
1510 ENDCA5E 

1520 PROCtabxy:PRINT TAB(tabx%,taby%)br 
acket$; 

1530 VDU31,chrpos*+ehar%,taby* 

1540 ENDPROC 
1550 ; 

1560 DEF FNnumtochr{number*) 

1570 IF number*<32 OR number%>126 THEN 
ELSE =CHR$number% 

1580 ; 

1590 DEF FNnumtostr(number*,length*) 
1600 =STRING${length*-LEN(STR$~(number* 
) ), " 0 ,r ) +$TR$-( number*) 

1610 : 

1620 DEF PROCinitialise 
1630 PRINT* f "Please enter required star 
t address" 

1640 PRINT"or press Return to Start at 
PAGE" 

1650 PRINT" Accept able range 0 to ";~(HI 
MEM-S200) SPC8; 

1660 INPUT M 5"memory$:CLS:ON 
1670 IF memory$="" THEN memory*-PAGE EL 
SE memory%-EVAL("6"+memQry$) 

1680 COLOUR 0,120,0,32 
1690 OSCLI("FX 4,1");OSCLI("FX 225,2") 
1700 tabkey*=-l:skip$=CHR$9+CHR$9 
1710 curpos%=0:curnin*--l:boundl%-0 
i/ 1720 chrpos%=6l: curmax *=512 : bound2*=HIM 
EM-512 

1730 PROCpagedisplay(FALSE) 

1740 ENDPROC 
1750 : 

1760 DEF FROCerror 

\f 111Q VDU7,31,3,31:PRINT:COLOUR OiCOLOUR 
129 

1780 OSCLI ("FX 4,0 11 } :OSCLI ("FX 225,1") 
1790 IF ERR=17 THEN PRINT "FINISHED 
ELSE REPORT:PRINT " at line ";ERL,‘" 

1800 COLOUR 0, 0,0, 0:COLOUR 7:COLOUR 128 
1810 ENDPROC m 
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ARCHIMEDES DISC MENU (Part 3) 

By lee Cal craft 



Notes on using Hie special auto load option on David Fillings Disc Menu. 


As we mentioned In the first part of this 
series, the RISC User Menu has a special 
facility engaged with the middle button of the 
mouse, which allows you to select files from the 
menu, and automatically engage a word 
processor, or other software. 

What happens when you click the middle 
button on a filename is that the Menu stores the 
selected filename tn the operating system 
variable FNAME. It then tries to EXEC in a file 
called IMENU*, This means that the user can 
create one or more IMENU files on his disc 
which toad the required application software, 
such as a word processor, or whatever, then 
set up function keys, assign the date, set up 
printer options, etc. And finally, the EXEC file 
can pick up the filename selected by the user 
(and stored by the Menu in the variable 
FMENU), and cause this to be loaded into the 
application. 


*1 >!MENUedit 

*| Auto Loader for ARMBE 
* | Version 0,3 

GSCLI("KEY1 LOAD "+CHR$34+"<FNAME 
>"+CHR$34 + "|MEDIT IM") 

*FX138,0,129 


The system is completely flexible, and can 
be used with almost any application. To 
illustrate its use, a number of examples are 
given. The first causes the selected file to be 
loaded into the Basic Editor. As with each of 
the examples, it should be saved as an EXEC 
file, that is to say, without line numbers (either 
use *BUILD or a word processor or text editor), 
and should be given a file type of &FFE (type 
‘SETTYPE filename FFE), The name under 
which it is saved must begin with IMENU, and 
could be followed by the letters edit for 
example, as a reminder of its function. The file 
fMENUedit should be saved in the same 
directory as the one containing the files which it 


will be used to load; and note that no directory 
should contain more than one IMENU file. 


*| >IMENUww+ 

* | Auto Loader for Wordwise Plus 
*\ Version 0 « 3 

*BUFFER ON 

OSCLI("KEYl :D$="+CHR$ 34 + "<5YS$D 
ATE> < SY S $ YEAR> "+CHR$ 3 4 + "1 M: F $ 
= "+CHR$ 34 + " <FNAME> 11 +CHR $ 3 4 + n |M 
:LOAD TEXT F$|M|M") 

* $,MODULES.65ARTHUR 

* $,MODULES.WW+ 

*FX138,0,129 


The second example, which might be saved 
as lMENUww+, loads files into Wordwise Plus, 
and gives some idea of the flexibility of the 
technique. It first turns on a printer buffer, and 
causes the Emulator to be loaded from disc, 
then Wordwise itself. Next it copies the system 
date into Wordwise’s variable D$, and the user- 
selected filename into the Wordwise filename 
variable F$, and then loads the file. If you wish 
to set up your printer or function keys, this can 
be performed at the very start of the EXEC file. 
The third example ioads any program Into the 
Twin text editor, with the LISTO option 8 set, 
and with white text on a blue background. 


*| > fMENUtwin 

* I Auto Loader for Twin 

* 1 Version 0.3 

*5ET ALIAS$Blue ECHO |<19>|<0>1<4> 
[<Q>|<0>|<0> 

OSCLI ("KEY3 LOAD ,T +CHR$34 + "<FNAME> 
M +CHR$34 + " 1MTWIN08 1 M M +CHR$129 + '*B 
lueSMIM") 

*FXl38 r G,13l 


The whole system is quite flexible, so that 
you may customise it to meet individual needs. 
If you create any interesting [MENU files, 
please let us know so that we may pass them 
on to other readers, pm 
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We continue our series on the graphics capabilities of the Archimedes by delving into the 
complex secrets of the 256 colour modes. 


Last month we looked at how we can control the 
choice of colour in those Archimedes modes which 
allow up 16 colours on the screen at any one time. 
This time we will look at how things are managed in 
the 256 colour modes, that is modes 10, 13 and 15. 
This is quite different to what happens in other 
modes. Indeed, it would appear on first examination 
that only 64 colours are possible, not the full 256. 

The problem is that on the older BBC micros, 
logical colours in the range 0 to 127 (of which only 0 
to 15 were used), specify a foreground colour, and 
logical colours 128 to 255 specify a background 
colour. It is Acorn's decision to maintain 
compatibility with that system which is at the root of 
our immediate problems. If we were to specify a 
colour above 127, then the convention already 
established would deem that this was a background 
colour. 

U8ING 64 COLOURS 

In practice, COLOUR or GCOL are used in the 
256 colour modes, just as in all the other modes, to 
specify a logical colour number, but in the range 0 
to 63 (foreground). Adding 128 to any of these 
specifies a background colour just as before. This 
gives us. without any further effort, a range of 64 
colours. For example: 

COLOUR 15 

would select a shade of yellow for text, while: 

GCOL 148 

would select a deep blue-green (colour 20 - since 
148 = 128 4 - 20) as a graphics background colour. 

USING Bg6 COLOURS 

In order to increase the number of colours from 
64 up to the maximum of 256 we need to use the 
additional keyword TINT. The value of TINT may be 
used to add one of four levels of white to each of 
the basic 64 colours. The standard format for 
selecting one of the 256 colours is then: 

COLOUR n TINT t 
or: 

GCOL n TINT t 

where n is the logical colour number in the range 0 
to 63 (128 to 191 for background colours), and t is 
the tint level. 

Now although there are only four levels of tint, 
the value of TINT can be anywhere in the range 0 
to 255 (not 0 to 3 as given in early User Guides) 
with the following meaning: 


range meaning 

0-63 level 0 (min.) 

64-127 level 1 

128-192 level 2 

192-255 level 3 (max.) 

In practice, it is therefore best to use the values 0, 
64, 128 and 192 when determining the level of tint. 
The current (or default) level of tint is always applied 
to all colours specified even if TINT is left out. 

This default is set at 0 (minimum white) initially. 
In such cases all colours, including white, appear 
slightly dull on the screen. To get the brightest white 
(colour 63) you will need to set the tint level to 192, 
though you will then find that black (colour 0) 
appears as very dark (but visible) grey. 

There are a few points to note. To ensure the 
correct shade of colour I suggest that you always 
use TINT with GCOL or COLOUR, unless you are 
happy with the just the basic 64 colours. Note too, 
that tint levels exist independently for text and 
graphics. Thus specifying TINT in a COLOUR 
command will not affect the level of tint applied in a 
subsequent GCOL command, and vice versa, lastly, 
the commands ‘POINTER and MOUSE ON appear 
to have the side effect of setting the tint level to its 
maximum (192). 



The accompanying program, Shades256, 
displays (in mode 13) all 256 colours on the screen 
together, and you may find this a useful colour 
reference chart for modes 10, 13 and 15. The 
colours are displayed in tabular form, and in blocks 
of four tints at a time. The colour (i.e. a number in 
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OvEr THE rRInBOW 


the range 0 to 63} for any block is given by adding 
together the appropriate row and column numbers. 
En each block of four, each shade has increasing 
amounts of tint added from left (darkest) to right 
(brightest). 

Essentially, the display is produced by two 
nested loops, the outer one cycling through all 64 
basic colour numbers, and the inner one cycling 
through the four levels of tint (lines 130 and 140). 
Each colour is displayed by selecting it as a 
background colour (using COLOUR and TINT), and 
then printing a space. The remaining statements 
are concerned with the general layout and design of 
the screen display. To exit from the program just 
press Escape, 

10 REM >Shades256 

20 REM Program Shades256 

30 REM Version A1.0 

40 REM Author Mike Williams 

50 REM RISC User Jan/Feb 1983 

60 REM Program subject to copyright 

70 i 

80 MODE 13:OFF:ON ERROR GOTO 250 
90 PRINTTAB(14,1)“256 COLOURS" 

100 PRINT 1 TAB(2);:COLOUR 148 TINT 64:C 
OLOUR 15 TINT 64 

110 PRINT "Colour" TAB (12) " 0 "; TAB (19) " 1 " 

;TAR(26);"2”TAB(33);"3”;SPC3 
120 COLOUR 123 TINT 0 
130 EOR shade-0 TO 63 
140 FOR tint=0 TO 192 STEP 64 
150 IF shade MOD4-0 AND tint MOD256-0 
THEN PRINT'TAB(2);:COLOUR 148 TINT 64:PR 
INTSPC(2-(shade<9));STR$ ((shade DIV4)*4) 
;SPC2;:COLOUR 128 TINT 0:PRINTTAB(10); 

160 COLOUR 123+shade TINT tint 
170 PRINT" 

130 NEXT tint 

190 COLOUR 128 TINT Q:PRINT SPC3; 

200 NEXT shade 

210 PRINT 1P TAB(2);:COLOUR 148 TINT 64: 
PRINT STRING?(35,CHR$32) 

220 REPEAT UNTIL FALSE 
230 END 
240 : 

250 MODE12:REPORT:PRINT" at line ";ERL 
: END 


ess COLOUR modes explained 

it is quite instructive to examine in more detail 
just how the colours are determined in a 256 colour 
mode. The following program. Mixer256, will help in 
this task. Superficially, it resembles last months 
Colour Mixing program, but it cannot be 


emphasized too much that the 256 colour modes 
operate quite differently to the two, four and sixteen 
colour modes. 



Each of the 64 basic colours is made up of red, 
green and blue components. Each of these may be 
set at one of four levels (in the range 0 to 3), The 
colour number may then be computed in the 
following way: 

colour = I6*blue + 4*green + red 

In other words, the use of COLOUR or GCOL is 
linked to a byte in memory (8 bits). The bottom two 
bits specify the level of red, the next two the level of 
green and the next two again the level of blue. The 
top two bits do not specify any colour at all, but the 
top-most bit signifies foreground (if 0) or 
background (if 1). 

In addition, TINT is linked to a further memory 
byte, and it is the top two bits of this which 
determine its level. In this context it is more 
convenient to think of the tint as being in the range 
0 to 3, as with the colours, and then multiplying the 
value in this range by 64 to specify TINT correctly. 
Thus COLOUR (or GCOL) would take the form: 

COLOUR 16*blue+4-*green+red TINT 64*tint 

When running the program, the large square 
shows the currently selected shade of colour (in the 
range 0 to 63), and the three squares below indicate 
the levels of red, green and blue. To the right of 
these three, a further square shows the level of tint. 
Initially, the program selects colour 63 (white) and 
sets the tint to 3 (maximum whiteness) to give a 
bright white result. The mouse pointer may be 
moved to any of the squares on the screen, and 
pressing the left-most (select) button will decrease 
the colour value of that square by one, and pressing 
the right-hand button (adjust) will increase that 
colour value by one. 
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vEr THE RAINBOW 


Clicking on the large square will not only change 
that colour shade (up or down), but will adjust the 
levels of red T green and blue accordingly. 
Alternatively, clicking on the individual colour 
squares will directly increase or decrease the levels 
of these three colour components (and the changes 
will be reflected in the colour of the large square), 
while clicking on the tint square will independently 
change this. The levels of all colours and tint are 
continuously updated on the screen, and displayed 
in numerical form as well. 

As you will have seen, there is much more to 
using the 256 colour modes on the Archimedes 
than might at first be expected. Whether your own 
applications of these modes demands simple or 
complex colour handling you should find that the 
two programs presented here will help. 

In the above examples, we have not at any time 
re-defined any of the physical to logical colour 
assignments (as we did last month in other modes 
with VDU19). Each shade displayed has been 
obtained simply by specifying the appropriate colour 
number and tint level required. It is possible to re¬ 
assign the physical colours used in these modes, 
but it is a complex process, and one which Acorn 
advises against whenever possible, 

10 REM >MixBr256 

20 REM Program Mixer256 

30 REM Version Al.7 

40 REM Author Kike Williams 

50 REM RISC User Jan/Feb 1980 

60 REM Program subject to copyright 

70 : 

80 ON ERROR GOTO 670 
90 MODE15:OFF:* POINTER 
100 VDU19,1,24,240,96,0 
110 VDU19,1,25,112,96,112 
120 VDU19,2,25,240,0,112 
130 COLOUR 15 TINT 192 
135 COLOUR 148 TINT 64 
140 PRINTTAB(22, 1)" 256 CO LOU 

R MODES " 

] 50 red=3: green-3: blue 3 * 3 
155 shade=63:tint=3 
160 REPEAT 
170 PROCmouse 
180 PROCboxes 

190 TIME^D:REPEAT UNTIL TIME>5 
200 UNTIL FALSE 
210 END 
220 : 

230 DEFPROCboxes 

240 GCGL shade TINT 64*tint 


250 RECTANGLEFILL 345,420,590,500 
260 FOR box-1 TO 4 
270 PROCrect(box) 

280 NEXT box 
290 ENDPROC 
300 : 

310 DEF PROCrect(box) 

320 GCOL FNrgb(box) TINT 64*tint 
330 RECTANGLEFILL 200*box+l45,200,190, 
200 

340 PRINTTAB {23,27) "Bl ue= Tr ; blue; TAB {3 6 
,27) r, Green=";green; TAB [49,27) M Red-";red; 
TAB (61, 27) ’'Tint-"; tint 

350 PRINTTAB(24,29)"Colour - 16*";blue 
+ 4* M ;green;* + ";red;" = H ;FNjust(sh 
ade,2) 

360 ENDPROC 
370 : 

380 DEF PROCmouse 

390 LOCAL p,q,x,y,state 

400 MOUSE x,y,state:p- (5-2*state)/3 

410 CASE state OF 

420 WREN 1,4 

430 IF FNTest(x,Y,345,420,590,500) THE 
N ahade=(shade+p+64)MOD64:PROCsetrgb 
440 IF FNTestfx,y,345,200,190,200) THE 
N blue-(blue+p+4)MOD4 

450 IF FNTest(x,y,545,200,190,200) THE 
N g reen=(gre en+p+4)MOD 4 

460 IF FNTest (x,y, 745,200,190,200) THE 
N red=(red+p+4) MOD4 

470 IF FNTest(x,y,945,200,190, 200) THE 
N tint- (t int+p + 4) MOD 4 
480 ENDCASE 

490 shade=16*blue+4*green+red 
500 ENDPROC 
510 : 

520 DEF FNrgbfbox) 

530 IF box-4 THEN *63 

540 -shade AND (3*2*(6-2*box)) 

550 : 

560 DEF PROCsetrgb 
570 red-FNrgb(3) 

580 green=FNrgb(2)/4 
590 blue^FNrgb(1)/I6 
600 ENDPROC 
610 : 

620 DEF FNjust(p,w)=STR$(p)+STRINGS(w- 
LEN(STR$(p)),CHR$32) 

630 : 

640 DEF FNTest (x,y,xl,yl,w,h) 

650 IF X>=xl AND x<"xl+w AND y>=yl AND 
y<=yl+h THEN -TRUE ELSE “FALSE 
660 : 

670 MODE!2:REPORT;PRINT" at line n ;ERL 
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SEE® TO WRgrtlML'DTS LI9£K£ 


Reviewed by Dennis Weaver 



Many Archimedes users have upgraded from 
the BBC Micro or Master, and as a consequence, 
have quantities of software on 5,25 inch discs 
which they would like to transfer to the Archimedes. 
To meet this need a number of suppliers have 
announced RS232 transfer links, while others have 
proposed connecting 5.25 inch drives to the 
Archimedes, In this brief review, we will be looking 
at two packages which follow the former route. 

•Ba&N&oyrs vise co9&>e%$io9{?(i<t 

In spite of their somewhat unlikely name, 
Brainsoft have produced a competent, and keenly 
priced package. 

For just £14 (no 
VAT), you get a 
transfer lead and 
two discs, one 
for the Beeb, and 
one for the 
Archimedes. The 
manual is brief 
and reasonably 
clear, and the 
lead, though only 
1 metre in 
length, is well 
made. 


The principle used by 
the Brainsoft package is to 
allow the BBC Micro with its 
disc drive (DFS format only 
at the moment) to behave 
as an additional disc drive 
on the Archimedes. When 
you boot the discs as 
Instructed, the Archimedes 
displays a modified version 
of Acorn's Desktop (copyright Acorn!), if you click 
on its extra disc icon, your BBC disc is catalogued r 
and you may then use the mouse to mark any 
number of files for transfer. On clicking the menu 
button, a series of options is offered, including one 
to transfer ail marked files to the Archimedes 3,5 
inch disc. 


work with ADFS discs, and to cope with the series 
one operating system, they will have a most 
competitive product 

<mmiuys mcftiMEiyEs sesjkl l r:\\ 

At £17.25 this costs a little more than the 
Brainsoft unit, and contains just one 3,5 inch disc 
with lead and manual. But the software is more 
sophisticated, and the accompanying lead is 
somewhat longer at 3 metres in length. To get the 
BEEBUG unit running for the first time, you must 
boot the 3,5 inch disc on the Archimedes, and then 
type two FX commands on the BBC micro. The 
Beeb's part of the transfer 
software is then ported across 
from the Archimedes, and can be 
saved for subsequent use. 

The BEEBUG package, which 
will handle DFS or ADFS format 
Beeb discs, provides the user 
with a dual window system 
working under WIMPs which 
allows you to move 
around the direc¬ 
tories of either Beeb 
or Archimedes disc, 
and to mark any or 
alf of the files (and/or 
directories) from 
either machine, 
using the mouse. 
When marking is 
complete, the files 
are automatically 
transferred to the 
second machine. 
Complete directories 
may be transferred 
in this way, and the software will automatically 
create new directories on the destination disc where 
necessary. Like the Brainsoft unit, the BEEBUG 
package permits the transfer of all types of file, and 
when transferring from Beeb to Archimedes, it also 
attempts to assign file types intelligently. 


(Disc Conversion !Xjt, £14.00 

All appears to function as described in the ‘Brainsoft are on 0i-4S6 032i 
manual, except that I could not get the package to 

work with the new series one operating system. ftrcfUmedtsSerialLinij ti?\2$ (Members) 
Once Brainsoft have upgraded their package to an on (on?) 40303 
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SYSTEM DELTA PLUS 


Mike Williams and Mark Sealey have compiled this report on Minerva's latest database tor 

the Archimedes System Delta Plus, 


RISC User has already reviewed Minerva's 
earlier 'Deftabase' package (see the November 
issue), and a thoroughly workmanlike product it 
was found to be. Big brother, in the form of 
System Delta Plus, is now available but at a 
much higher price. This time Minerva has fully 
exploited the WIMP environment of the 
Archimedes to produce a highly attractive 
looking package. 

Minerva claims that despite the relatively 
Sow price, System Delta Pius offers facilities as 
good as (if not better than) the likes of dBase, 
Lotus 123 and other PC software, plus the 
bonus of the enhanced graphics of the 
Archimedes. Those accustomed to the lower 
price of older BBC micro products may take a 
little more convincing* 

Strictly speaking, System Delta Plus is a set 
of sophisticated database commands (star 
commands) which can be used in conjunction 
with Basic to build a tailor-made database. A 
complete system designed in this way and 
referred to as WIMP Card Index is supplied as 
part of System Delta Plus. As it is assumed that 
most users will buy the package for the WIMP 
Card lndex 1 the accompanying manual, and 
this review, concentrate on this. For the more 
advanced user, the full power of System Delta 
Plus is always available for those applications 
that warrant it. 

The manual ■ whilst being better than the 
one for Deltabase - is still a bit of a 
compromise. It consists of a snazzy plastic clip- 
binder containing over 120 pages of very 
ordinary looking text with a good few black and 
white illustrations. It is rather disappointing after 
the glossy and colourful cover. Nor is the 
organisation of the material particularly well 
thought out, although you'll find everything you 
need - eventually. There is an introductory 
tutorial, called the ’Experimental Section’, and a 
rather short reference section at the back 
where all the System Delta Pius functions are 
listed with a brief explanation. On the whole we 
feel that the manual performs better as a 
reference when you are already familiar with 


the package and know where to find what you 
want. 

This aside, the WIMP Card Index can be 
thoroughly recommended, its capacity is 
impressive, though neither a standard 8QGK 
floppy nor even a 20MByte hard disc will 
provide anywhere near the storage needed for 
the maximum 2J4 billion records which the 
system is theoretically capable of handling. And 
fields are still limited to the maximum 255 
character length permitted by Basic. Several 
files can be open at the same time, and it is 
quite possible to browse through one file while 
printing a report from another and searching a 
third. The system does slow down in these 
circumstances but this multi-tasking 
environment can be of real value when 
comparing data. 



1 System Defta 


All of this is managed through a system of 
WIMP menus. These control all the usual 
database functions, including the option to 
divide any fite into as many as 32 subsets, each 
of which may be treated quite independently of 
the others, and of the main file. At this level you 
can also perform mathematical and statistical 
operations on data. 

A menu bar across the foot of the screen 
gives you constant access to a number of 
additional functions. These allow for the input of 
both Operating System and System Delta star 
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commands as well as monitor and printer 
adjustments, A wrist-watch and pocket 
calculator of the usual simple style are also 
provided, and can be selected and positioned 
on the screen. These hardly seem essential 
adjuncts of any database system, and one Is 
faced with the conclusion that Minerva has 
succumbed to the temptation to exploit the 
Archimedes graphics capability with some 
pretty but unnecessary images. Although the 
menu screens are remarkably uncluttered and 
easy to read, do you really want to be able to 
display and set a wristwatch? 

In practice, the menu system works well. 
Clicking the menu button of the mouse 
anywhere on the empty screen produces a 
menu from which you can create a new file or 
open an existing one. Other global options are 
also available from this menu which allow you 
to branch sideways to other menus for sorting, 
data transfer and the creation or modification 
both of file structures themselves and layout 
formats. 

Once a file has been opened, a window 
appears on the screen displaying the first 
record with a panel of control icons for 
browsing backwards and forwards through the 
records. Pressing the menu button with the 
pointer anywhere within this 'data window' 
produces a different menu with options 
appropriate to record handling (Find Field, Find 
Card, Delete Card etc), and several options can 
be followed to further sub-menus. 

These menus are very easy to use, with 
prompts for confirmation when it matters. 
Naturally, when creating a new file, you can 
arrange for data fields to be positioned 
wherever you want in the data window, with 
separate text prompts of your choice. It is afso 
possible to alter your record design later, 
including even the addition of extra fields if you 
wish. What is more, data held in a particular 
subset couid also form the basis of a new file 
altogether. Nothing has to be re-entered. 

The basic routines are all in ARM machine 
code. The full System Delta Plus is really a 


suite of overlays in Basic to tie them together. 
So the user with the right knowledge could 
customise and manipulate their own database 
by means of some 41 primary commands. For 
example: 

*SDfind <string$> <file> 

finds the card containing <string$>. By the time 
you read this, an Advanced Programmer's 
Manual for this product will afso be available to 
help, although the majority of users wilt 
probably not want to delve this deep. 

There is also an Import facility that handles 
data from Viewstore, the Computer Concepts 
Inter-series, BEEBUG's Wasterfile, pure ASCII, 
Mini-Office, Alpha-Base, Beta-Base, dBase, 
Lotus, DataGem and the new BBC Uniform 
formats. Files can also be created that are 
downward (BBC System Delta) compatible. 

CONCLUSION 

The speed of System Delta Plus is 
impressive, and the constant but unobtrusive 
on-screen progress reports (when sorting for 
instance) add to the overall friendliness. For the 
experienced business user who switches, say, 
from dBase III to an Archimedes system, the 
WIMP Card Index will win hands down. It is 
easier to understand and control what’s 
happening and certainly much quicker. One of 
the databases that we have tried is 175K long, 
has four fields and 600 records. It takes just 
four minutes to sort on three fields. 

Data handling can be a very involved 
process, and Minerva have certainly gone for a 
very comprehensive package with System 
Delta Plus. Nevertheless, the package 
succeeds in being easy to understand, fast in 
operation, and enjoyable to use. System Delta 
Plus sets a high standard for database software 
on the Archimedes, and one that deserves to 
last for some time to come 


Product System Delta Plus 
Supplier Minerva Systems 
69 Sidwell Street, 
Exeter EX4 6PH 
Price £69.95 Inc. VAT 
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A ftOIMQIKV MAP AROHD 

By Lee Calcraff 


There are some programmers who say that they cannot really get the feel of a machine 
without understanding its memory map. For those and others, here are some brief notes on 

the Archimedes' memory map. 


The first problem encountered when 
mapping the memory of an Archimedes is that, 
unlike the trusty Model B, RAM is not 
permanently located at a given address. On the 
model B, you could be sure that there was 
physical RAM from address &0 to &7FFF. On 
the Archimedes, the user has no direct access 
to physical RAM whatsoever. At! RAM 
accessed by the user, whether through 
indirection operators or from machine code, 
appears at a given so-called logical address. 
This logical address can range from &0 to 
&1 FFFFFF (0 to 32 Mbytes), and since the 
machine can have a maximum of 1 Mbyte of 
physical RAM (4 Mbytes for the 400 series), 
there will be a great deal of logical RAM which 
does not map directly on to physical RAM l By 
contrast, every byte of physical RAM always 
has a corresponding (though changeable) 
logical address. If from Basic you try to access 
RAM at a logical address which Is not mapped 
on to physical RAM, you get the fatal (and 
untrappable) error "Abort on data transfer". For 
example try (with no harm to your machine) 
PRINT ?&A 12345. 

The accompanying table gives the 
allocation of RAM on Archimedes machines, 
and should be valid for both the 300 and 400 
series. The precise allocation of RAM within 
this map is made at power-up, and depends on 
the configured settings. You are referred to last 


month's article "Configuring Archimedes" for 
further details; but to give an example, if you 
use ‘CONFIGURE SPRITEStZE 10 you will 
allocate 10 pages of 8K on a 300 series (or 10 


pages of 32K on a 400 series) to sprite use, 
making 80K (or 320K) in all. This RAM would 
be allocated from &1400000 upwards, AH other 
user allocations on the table are made in the 
same way (i.e. upwards from the base 
address), except for screen RAM, This is 
allocated downwards from the base address 
(i.e. from &1 FFFFFF downwards). To confuse 
things a little further, the base address of any 
given screen is the lowest memory location of 
the allocated area (e.g. &1FOSOOO on a 
machine with 160K allocated to screen use). 
This means that the screen base address (as 
distinct from the screen allocation base 
address) is a variable quantity. 

You may have noticed one apparent 
omission from the RAM allocation table. As you 
can see, there is no individual allocation for font 
use, even though font space is assigned using 
the ‘CONFIGURE command The reason for 
this is that font space is taken from the 
relocatable module area. This means that the 
amount of RAM reserved in the RMA area is 
actually the sum of three components: the block 
of RAM automatically taken by the operating 
system for workspace for resident modules, 
plus the amount of configured font space, plus 
the configured RMA space. This can add up to 
a very large allocation indeed, given that the 
modules supplied with the series one system 
require over 110K of workspace. 


As a tailpiece to this article, we shall be 
publishing next month a program to map out 
the precise allocation of RAM in any machine 
over the full 32 Mbyte range. f&lj 


BASE ADDR 

FUNCTION 

ALLOCATION 

ALTER WITH 

1FFF FFF 

Screen Memory 

G-480K 

‘CON.SCREENSIZE 

] F00 000 

Cursor/System Space 

32K fixed 


icoa ooo 

System Heap/Stack 

16K-3M 

‘CON.SVSTEMSIZE 

1800 000 

Relocatable Modules 

0-4M 

"CON.RMASIZE 

1400 000 

Sprite Area 

Q-4M 

‘CON.SPRITESIZE 

1000 000 

RAM Filing System 

0-4M 

'CON.RAMFSSIZE 

0008 000 

Applications (eg Basic) 

Dynamic 


0000 000 

System Space 

32 K fixed 
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rnmf&m Hintre-niy 


Another crop of hints, tips and information rounded up by Lee Caicrafh 


BUILT \H SCREEN DUMPS 

With the new operating system there is a resident module 
called Hardcopy, which provides 3 mono printer dumps 
for the Epson FX, MX and RX printers. The commands 
are called "HARDCOPYFX, "HARDCOPYMX and 
"HARDCOPYRX respectively. The syntax is the same for 
each; 

*HARDCOPY vert/horiz Xscale Yscale 
Margin Threshold 

The first parameter determines whether the dump is 
printed normally (0) or widthways (1), The next two give 
the horizontal and vertical scale, and should normally be 
set to 1. Larger values will give a larger printout. Next 
come the left hand margin, and the threshold (0-15) at 
which the dump output changes from black to white. A 
good range of parameters to try is: 

*HARDCOEYFX 01105 

’COUNT FOR COUNTING DISC SPACE 

The command ‘FREE will tell you how much free space 
you have left on a disc. But with the series one operating 
system, there is a new and powerful command, "COUNT, 
for giving much more detailed information, if you type: 

*COUNT name 

it will display the length of the file name. But if name is a 
directory it will give the disc space used by that directory, 
including all sub-directories. The command will accept 
wildcards, and if you type: 

*COUNT $ 

it will give the space used for the whole disc, sub-divided 
into directories. This is very useful when you need to find 
out how a disc has suddenly become full. 

Setter yet, there is a series of options (set using "SET 
Count$Opfions, similar to those for ’COPY) which allow 
you to determine recursion, verbose display etc (type 
"HELP COUNT for details), if you use: 

* COUNT $ V 

you will get a display (or printout) of every file on your disc 
together with Sts length, all grouped by directory. 


buttons, before the next input is used. A suitable line 
might take the form: 

REPEAT MOUSE X, Y, Z rUNTIL 2-0 

Depending upon the application, you may need to follow 
this with a line which waits until a new button is pressed: 
REPEAT MOUSE X,Y,Z:UNTIL Z>0 

ALTERED RUN AND FILE PATHS 

On operating systems 0.3 and above, the syntax for the 
"SET File$Path and "SET Run$Rath commands has been 
altered. On all operating systems later than 0.2, a dot ,r ." 
must appear as terminator for each file path in the 
sequence supplied. To take an example, the command: 

*5ET RUN?PATH MODULES 

telfs operating system 0,2 to look in the current directory, 
then in the library directory and finally in a directory called 
S.MODULES, whenever "filename (or ‘RUN filename) is 
issued. The space before the first comma is essential. 

On all operating systems greater than 0,2 the ‘SET 
command must be altered to: 

*SET RUN$PATH ,%.,$*MODULES. 

The same syntax change has occurred with "SET 
File$Path, This latter command determines the directories 
searched during other ’read' file operations, including 
"LOAD. 

TWIN AUTO-LOAD 

If you use the following alias: 

*SET Al i a s $ @ LoadType_FFE TWIN %*0 
every EXEC or Command file (or any other file of type 
FFE) which you attempt to load will automatically cause 
TWIN to be loaded in with the selected file in its buffer. 
This can be very useful when used in conjunction with the 
RISC User Disc Menu. Whenever you double click with 
the adjust button (i.e. invoking a load) on a Command or 
EXEC file, it will go into TWIN ready for you to edit it. 

The Reference Manual, page 216, states that the syntax 
of this command has changed on operating systems 0.4 
(sic) and above. This does not appear to be the case. 


CLEARING THE MOUSE 

Although there is an FX call to flush the mouse’s input BASIC APPEND 

buffer (See Hints and Tips, Vol.l Issue 2), you can still get APPEND is a very useful addition to BBC Basic, If you 

problems of one mouse button input overflowing into the type: 

next. One way to avoid this is to insert a line which waits append "filename” 

until the user has stopped pressing any of the mouse the file called filename will be appended io any currently 
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resident Basic program. One particularly useful feature of 
the command is that the appended file is automatically 
renumbered to match the numbering of the resident 
program. You can therefore save procedures and so on 
as ordinary Basic files, without paying any attention to line 
numtiers. Then whenever they are required, tiiey can be 
appended to a program underdevelopment. 

WHICH OPERATING SYSTEM? 

There is no simple way to test which operating system 
you have from within a running program. But the following 
function does the trick: 

10 REM >ostest4 
20 PRINTFNversion 
30 END 
40 : 

50 DEFFNveraion 

60 SYS 6+2 A 17,0,0 TO A% 

70 A$=" n :A%+=11 
SO FOR B-Q TO 3 
90 A$+=CHR$ 

100 NEXT : =VAL(A$) 


The number returned is the operating system number. 
Early operating systems will return 0.2 or 0.3, while the 
new series one operating system returns S2, 

FINDING UNPLUGGED MODULES 

You can use 'UNPLUG modulename to permanently 
unplug any non-essential relocatable module. It is useful 
to know that "UNPLUG with no parameter lists all those 
modules that have been unplugged. Use *RMREINtT 
maduiename t followed by Ctrt-Break, to reinstate them, 
Thanks to Dave Clare for this hint. 

DESKTOP FUNCTION KEY RETRIEVAL 

After you have used the Desktop, even from the new 
operating system, you will find that the function keys have 
been inadvertently left disabled. To retrieve them t use 
*FX225,1 


Please send your Hints & Tips to the Editors 
at the editorial address given at the end of 
the magazine. All contributions welcomed. 


ARCHIMEDES VISUALS (continued from page 17 ) 


SllU 8*fiS 

Our last routine this month generates a 
static 30 background in shades of blue, which 
could be used with the quad procedure above 
to extremely good effect. A set of blue bars are 
given a 3D effect by the use of a small dark 
band and a wider bright band between each 
bar. This background works very well indeed 
with certain kinds of text display, and has been 
used in the second of the two programs 
accompanying the article on anti-alias fonts 
elsewhere in this Issue, 

10 REM >BlueBars4 
20 REM 3D Background Effect 
30 REM By Lee Calcraft 
40 s 

50 MODE12 

60 COLOURS,0,112,208 
70 COLOUR! 0,0,160,240 
60 COLQURll, 0,0, 0 
90 : 



4 


100 GC0L128+9:CLG 

110 FOR Y=0 TO 1023 STEP 96 

120 GCGLlD:RECTANGLE FILL 0,Y,1279,12 

130 GCOL11:RECTANGLE FILL 0,Y+12,1279, 


140 NEXT 
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Computer Concepts' ROm Podule 

Previewed by Lee Caleroft 


The CC ROM Podule should be available 
by the time you read this brief preview. It works 
very much like a BBC micro ROM board, and 
will take 7 ROMs, EPROMs or RAM chips, 
each of which may be up to 128K in size. It has 
optional battery back-up, and can give the user 
a total of 896K of extra storage. The neatly 
designed board fits inside the Archimedes, and 
must be plugged into the so-called r Podule 
Backplane'. This latter device, supplied by 
Acorn at around £40, plugs into the 
Archimedes PCB to create two podule sockets, 
one of which is used by CC's board. 



After installation, and a very simple 
initialising process, the ROM Podufe becomes 
* operational. You can check its presence with 

the command *ROMPOD n where n is the 
podule number (normally 0 or 1), depending on 
whether the board is in the upper or lower 
jr podule socket). This displays a list of the ROM 
and RAM chips plugged into the board. To 
make use of the podule, you must first engage 
the ROM filing system (RFS) by typing "RFS. 
Once you have done this, all filing system star 
commands are directed to the ROM/RAM fifing 
system implemented on the board rather than 
to the ADFS (or ANFS). For example, typing 
‘CAT will catalogue all resident ROM and RAM 
files, while ‘FREE will give the number of free 
bytes of RFS RAM, and so on, Alt the fife 
operations from Basic also apply to the RFS, 
so to save a file, just type SAVE "filename". 
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As you may have gathered from the 
foregoing, the Archimedes does not allow 
software to be run directly from a ROM Podule 
in the way that the machine's ROM-based 
modules run from ROM. Each RFS file must be 
loaded into the computers main memory first. 
This loading process is about twice as fast as 
using the ADFS with floppies, but of course It 
uses up valuable RAM In the same way as 
loading fifes from disc. 

Even so, the RFS implemented on CCs 
ROM podufe offers the user a number of 
advantages. First of all, the speed of loading 
and the fact that all of its files are permanently 
resident In the machine (including those in 
RAM, providing that the optional battery back¬ 
up is fitted) makes it useful for storing 
frequently used utilities and applications. For 
example, you might keep the 6502 Emulator in 
podule RAM together with frequently used 
fonts, and perhaps the Twin editor. Additionally 
you can store auto-boot files on the RFS, and 
configure your machine to automatically run 
these at power up. If you wish, you can blow all 
these files on to EPROM with the aid of a 
special WIMPs driven ROM generator program 
supplied with the podule (though you will also 
need an EPROM blower for this). 

Apart from its massive provision of battery- 
backed RAM, a major reason for buying a ROM 
Podule is that all of CG T s new software for the 
Archimedes will only be supplied on ROM, and 
will only run from a ROM podule. From first 
impressions, it looks as if their software will be 
well worth the outlay - especially since they are 
intending to discount the Podule to purchasers 
of their Archimedes software, though not the 
Infer series of products. nr™ 
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RISC User Is available only on subscription, wtth a special introductory rate until early 
1988. Fiji subscribers to RISC User may also take out a reduced rate subscription to 
BEEBUG (the magazine for the 
BBC micro and Master series). 

Ait subscriptions, including 
overseas, should be in pounds 
sterling. We will also accept 
payment by Connect Access 
and Visa , and official UK orders 
are welcome. 


Subscription Ratos 02 Months) 

RISC User BEEBUG 

UK, BFPO, Ch.ls £12.50 

Rost of Europe 8tBre £18.00 £10.00 

Middle East £22.50 £11.00 

Americos & Africa £25.00 £11.50 

Elsewhere £27.00 £12.00 


BACK ISSUES 1 - 1 

We Intend to maintain stocks of back issues New subscribers can therefore obtain earlier 
copies to provide a complete set from VoU Issue l Back issues cost £120 each. You 
should also include postage as shown: 

Deitlnatlon 

First Issue 

Each sibsequent issue 


UK, BFPO, Ch.lt Europe plus Eire Elsewhere 

40p 75p £2 

20p 45p 65p 


The programs from each Issue of RISC User are available on a monthly 3.5' disc. This wifi be 
available to order , or you may take out a subscription to ensure that the disc arrives at 
the same time as the magazine. The first issue (wtth six programs and animated graphics 
demo) is at the special low price of £3J5. The disc for each Issue contains all the 
programs from the magazine, together with a number of additional items by way of 

demonstration , alt at the 
standard rate of £4.75. 

Disc subserfpf/ons include 
postage, but you should add 50p 
per disc for individual orders. 


The prices tor magazine discs are shown below: 

UK Overseas 

Single issue discs £ 475 £ 475 

Six months subscription £25,50 £30.00 

Twelve months subscription £50.00 £56.00 


Ail orders ; subscriptions and other correspondence should be addressed to; 

RISC User, Dolphin Place, Holywell Hill, St Albans, Herts All 1EX. 
Telephone: St Albans (0727) 40303 

(24hrs answerphone service for payment by Connect Access or Visa card) 














